Details

Time bar (total: 2.3min)

analyze8.2s (6%)

Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
0%0%99.8%0.2%0%0%0%1
0%0%99.8%0.2%0%0%0%2
0%0%99.8%0.2%0%0%0%3
0%0%99.8%0.2%0%0%0%4
0%0%99.8%0.2%0%0%0%5
0%0%99.8%0.2%0%0%0%6
0%0%99.8%0.2%0%0%0%7
0%0%99.8%0.2%0%0%0%8
0%0%99.8%0.2%0%0%0%9
0%0%99.8%0.2%0%0%0%10
0%0%99.8%0.2%0%0%0%11
0%0%99.8%0.2%0%0%0%12
Compiler

Compiled 189 to 125 computations (33.9% saved)

sample33.3s (24.1%)

Results
11.2s1948×body1024valid
6.7s5129×body256valid
5.8s994×body1024infinite
3.4s945×body512valid
2.8s2147×body256infinite
2.0s234×body2048valid
1.5s480×body512infinite
Bogosity

preprocess108.0ms (0.1%)

Algorithm
egg-herbie
Rules
1082×distribute-lft-neg-out
994×associate-*r*
942×associate-/r/
934×associate-*l*
646×*-commutative
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04136413
112736055
257996055
055
Stop Event
saturated
node limit
Calls
Call 1
Inputs
0
1
2
3
4
Outputs
0
1
2
3
4
Call 2
Inputs
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 a b) (*.f64 a (neg.f64 b)))) (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (*.f64 a b) (*.f64 a (neg.f64 b)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 a 2) (pow.f64 b 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 a b) (*.f64 a (neg.f64 b)))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b angle) (*.f64 b (neg.f64 angle)))) (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (*.f64 b angle) (*.f64 b (neg.f64 angle)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (sin.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (cos.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (sin.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (cos.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 angle 2))) (sin.f64 (*.f64 (/.f64 a 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 a 180) (PI.f64)))) x-scale) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b angle) (*.f64 b (neg.f64 angle)))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b x-scale) (*.f64 b (neg.f64 x-scale)))) (pow.f64 (*.f64 a y-scale) 2))) (*.f64 (*.f64 b x-scale) (*.f64 b (neg.f64 x-scale)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) a) a) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) a) a) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) a) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b x-scale) (*.f64 b (neg.f64 x-scale)))) (pow.f64 (*.f64 a y-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b y-scale) (*.f64 b (neg.f64 y-scale)))) (pow.f64 (*.f64 x-scale a) 2))) (*.f64 (*.f64 b y-scale) (*.f64 b (neg.f64 y-scale)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) a) a)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) a) a)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 y-scale 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) a) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b y-scale) (*.f64 b (neg.f64 y-scale)))) (pow.f64 (*.f64 x-scale a) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 angle a) (*.f64 angle (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (*.f64 angle a) (*.f64 angle (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2) (pow.f64 (*.f64 angle (cos.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2) (pow.f64 (*.f64 angle (sin.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2) (pow.f64 (*.f64 angle (cos.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2) (pow.f64 (*.f64 angle (sin.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 angle 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 b 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 b 180) (PI.f64)))) x-scale) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 angle a) (*.f64 angle (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 x-scale a) (*.f64 x-scale (neg.f64 a)))) (pow.f64 (*.f64 b y-scale) 2))) (*.f64 (*.f64 x-scale a) (*.f64 x-scale (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) b) b) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) b) b) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 x-scale 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) b) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 x-scale a) (*.f64 x-scale (neg.f64 a)))) (pow.f64 (*.f64 b y-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 y-scale a) (*.f64 y-scale (neg.f64 a)))) (pow.f64 (*.f64 x-scale b) 2))) (*.f64 (*.f64 y-scale a) (*.f64 y-scale (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) b) b)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) b) b)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 y-scale 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) b) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 y-scale a) (*.f64 y-scale (neg.f64 a)))) (pow.f64 (*.f64 x-scale b) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 angle y-scale) 2))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2)) angle) angle) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2)) angle) angle) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) angle) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 angle y-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale angle) 2))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2)) angle) angle)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2)) angle) angle)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) x-scale) angle) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale angle) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale x-scale) 2))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) y-scale) x-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale x-scale) 2)))
Outputs
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))) (*.f64 2 (/.f64 (*.f64 (*.f64 4 (*.f64 b a)) (*.f64 b (neg.f64 a))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 (*.f64 4 (*.f64 b a)) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a)) (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a))) (pow.f64 (*.f64 x-scale y-scale) 2)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale)))))))) (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a)))))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (neg.f64 b)))) (*.f64 (*.f64 (/.f64 8 (pow.f64 (*.f64 x-scale y-scale) 2)) (*.f64 a (*.f64 a (*.f64 b (neg.f64 b))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale)))))))) (*.f64 a (*.f64 a (*.f64 b (neg.f64 b)))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 a b) (*.f64 a (neg.f64 b)))) (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (*.f64 a b) (*.f64 a (neg.f64 b)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 a 2) (pow.f64 b 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 a b) (*.f64 a (neg.f64 b)))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))) (*.f64 2 (/.f64 (*.f64 (*.f64 4 (*.f64 b a)) (*.f64 b (neg.f64 a))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (*.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))) (*.f64 x-scale y-scale)) 2))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 4 (*.f64 b a)) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a)) (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a))) (pow.f64 (*.f64 x-scale y-scale) 2)) (+.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 2 (-.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) (*.f64 x-scale y-scale))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a)))))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (neg.f64 b)))) (*.f64 (*.f64 (/.f64 8 (pow.f64 (*.f64 x-scale y-scale) 2)) (*.f64 a (*.f64 a (*.f64 b (neg.f64 b))))) (+.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 2 (-.f64 (*.f64 a a) (*.f64 b b))) (*.f64 y-scale (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (*.f64 a (*.f64 a (*.f64 b (neg.f64 b)))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b angle) (*.f64 b (neg.f64 angle)))) (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (*.f64 b angle) (*.f64 b (neg.f64 angle)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (sin.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (cos.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (sin.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (cos.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 a 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 angle 2))) (sin.f64 (*.f64 (/.f64 a 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 a 180) (PI.f64)))) x-scale) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b angle) (*.f64 b (neg.f64 angle)))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 angle (*.f64 b (neg.f64 angle))))))) (*.f64 (*.f64 b (*.f64 angle (*.f64 b (neg.f64 angle)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (sin.f64 (/.f64 (*.f64 a (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 a (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (cos.f64 (/.f64 (*.f64 a (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 a (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (sin.f64 (/.f64 (*.f64 a (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 a (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 angle (cos.f64 (/.f64 (*.f64 a (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 a (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (*.f64 2 (-.f64 (*.f64 b b) (*.f64 angle angle))) (*.f64 (sin.f64 (/.f64 (*.f64 a (PI.f64)) 180)) (cos.f64 (/.f64 (*.f64 a (PI.f64)) 180)))) (*.f64 x-scale y-scale)) 2))))))))) (*.f64 4 (*.f64 b (*.f64 angle (*.f64 b (neg.f64 angle)))))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 angle (*.f64 b (neg.f64 angle)))) (*.f64 (/.f64 (*.f64 8 (*.f64 b (*.f64 angle (*.f64 b (neg.f64 angle))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (sin.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 angle (cos.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (sin.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 angle (cos.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 a 180))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 angle angle)))) x-scale) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 a 180))) y-scale))))))) (*.f64 b (*.f64 angle (*.f64 b (neg.f64 angle)))))))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 angle (*.f64 b (neg.f64 angle)))) (*.f64 (*.f64 (/.f64 8 (pow.f64 (*.f64 x-scale y-scale) 2)) (*.f64 b (*.f64 angle (*.f64 b (neg.f64 angle))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (sin.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 angle (cos.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 angle (sin.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 angle (cos.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 a 180)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (-.f64 (*.f64 b b) (*.f64 angle angle))) (*.f64 x-scale y-scale)) (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 a 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 a 180)))))))))) (*.f64 b (*.f64 angle (*.f64 b (neg.f64 angle)))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b x-scale) (*.f64 b (neg.f64 x-scale)))) (pow.f64 (*.f64 a y-scale) 2))) (*.f64 (*.f64 b x-scale) (*.f64 b (neg.f64 x-scale)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) a) a) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) a) a) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) a) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b x-scale) (*.f64 b (neg.f64 x-scale)))) (pow.f64 (*.f64 a y-scale) 2)))
(neg.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 2 (/.f64 4 (/.f64 (pow.f64 (*.f64 a y-scale) 2) (*.f64 b (*.f64 x-scale (*.f64 b (neg.f64 x-scale))))))) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 b (neg.f64 x-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 a a)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 a a)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (*.f64 (-.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))) (*.f64 a y-scale)) 2)))))))) (/.f64 4 (/.f64 (pow.f64 (*.f64 a y-scale) 2) (*.f64 b (*.f64 x-scale (*.f64 b (neg.f64 x-scale))))))))
(*.f64 (pow.f64 (*.f64 a y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 b x-scale) 2)) (*.f64 (/.f64 (*.f64 8 (neg.f64 (pow.f64 (*.f64 b x-scale) 2))) (pow.f64 (*.f64 a y-scale) 2)) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 a a)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 a a)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (fma.f64 b b (*.f64 x-scale (neg.f64 x-scale)))) a) (/.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) y-scale))))))) (neg.f64 (pow.f64 (*.f64 b x-scale) 2)))))
(*.f64 (pow.f64 (*.f64 a y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 b x-scale) 2)) (*.f64 (*.f64 (/.f64 8 (pow.f64 (*.f64 a y-scale) 2)) (neg.f64 (pow.f64 (*.f64 b x-scale) 2))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 a a)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 a a)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (fma.f64 b b (*.f64 x-scale (neg.f64 x-scale)))) a) (/.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) y-scale))))))) (neg.f64 (pow.f64 (*.f64 b x-scale) 2)))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b y-scale) (*.f64 b (neg.f64 y-scale)))) (pow.f64 (*.f64 x-scale a) 2))) (*.f64 (*.f64 b y-scale) (*.f64 b (neg.f64 y-scale)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) a) a)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) a) a)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 y-scale 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) a) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b y-scale) (*.f64 b (neg.f64 y-scale)))) (pow.f64 (*.f64 x-scale a) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 (*.f64 4 (*.f64 b y-scale)) (neg.f64 (*.f64 b y-scale)))) (pow.f64 (*.f64 a x-scale) 2)) (*.f64 (*.f64 b (*.f64 y-scale (neg.f64 (*.f64 b y-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 a a)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (*.f64 (-.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))) (*.f64 a x-scale)) 2))))))))) (/.f64 (*.f64 (*.f64 4 (*.f64 b y-scale)) (neg.f64 (*.f64 b y-scale))) (pow.f64 (*.f64 a x-scale) 2)))
(*.f64 (pow.f64 (*.f64 a x-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 b y-scale) 2)) (*.f64 (/.f64 (*.f64 8 (neg.f64 (pow.f64 (*.f64 b y-scale) 2))) (pow.f64 (*.f64 a x-scale) 2)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 a a)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 a a))) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 y-scale y-scale)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) a)))))))) (neg.f64 (pow.f64 (*.f64 b y-scale) 2)))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 angle a) (*.f64 angle (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (*.f64 angle a) (*.f64 angle (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2) (pow.f64 (*.f64 angle (cos.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2) (pow.f64 (*.f64 angle (sin.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2) (pow.f64 (*.f64 angle (cos.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2) (pow.f64 (*.f64 angle (sin.f64 (*.f64 (/.f64 b 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 angle 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 b 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 b 180) (PI.f64)))) x-scale) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 angle a) (*.f64 angle (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(neg.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 angle (*.f64 a (*.f64 (neg.f64 a) angle))) (/.f64 (*.f64 2 (*.f64 (*.f64 4 (*.f64 a angle)) (*.f64 (neg.f64 a) angle))) (pow.f64 (*.f64 x-scale y-scale) 2))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2) (pow.f64 (*.f64 angle (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2) (pow.f64 (*.f64 angle (sin.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2) (pow.f64 (*.f64 angle (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2) (pow.f64 (*.f64 angle (sin.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 b 180))) (*.f64 2 (*.f64 (-.f64 (*.f64 angle angle) (*.f64 a a)) (sin.f64 (*.f64 (PI.f64) (/.f64 b 180)))))) (*.f64 x-scale y-scale)) 2))))))) (/.f64 (*.f64 (*.f64 4 (*.f64 a angle)) (*.f64 (neg.f64 a) angle)) (pow.f64 (*.f64 x-scale y-scale) 2))))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a angle) (*.f64 (*.f64 a (neg.f64 angle)) (/.f64 (*.f64 8 (*.f64 angle (*.f64 a (*.f64 a (neg.f64 angle))))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2) (pow.f64 (*.f64 angle (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2) (pow.f64 (*.f64 angle (sin.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2) (pow.f64 (*.f64 angle (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2) (pow.f64 (*.f64 angle (sin.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (-.f64 (*.f64 angle angle) (*.f64 a a))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 b 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) y-scale)))))) (*.f64 angle (*.f64 a (*.f64 a (neg.f64 angle)))))))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a angle) (*.f64 (*.f64 a (neg.f64 angle)) (*.f64 (/.f64 8 (pow.f64 (*.f64 x-scale y-scale) 2)) (*.f64 angle (*.f64 a (*.f64 a (neg.f64 angle))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2) (pow.f64 (*.f64 angle (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2) (pow.f64 (*.f64 angle (sin.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2) (pow.f64 (*.f64 angle (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2) (pow.f64 (*.f64 angle (sin.f64 (*.f64 (PI.f64) (/.f64 b 180)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (-.f64 (*.f64 angle angle) (*.f64 a a))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 b 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 b 180)))) y-scale)))))) (*.f64 angle (*.f64 a (*.f64 a (neg.f64 angle)))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 x-scale a) (*.f64 x-scale (neg.f64 a)))) (pow.f64 (*.f64 b y-scale) 2))) (*.f64 (*.f64 x-scale a) (*.f64 x-scale (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) b) b) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) b) b) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 x-scale 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) b) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 x-scale a) (*.f64 x-scale (neg.f64 a)))) (pow.f64 (*.f64 b y-scale) 2)))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 b y-scale) 2) (*.f64 x-scale (*.f64 a (*.f64 (neg.f64 a) x-scale))))) (*.f64 x-scale (*.f64 a (*.f64 (neg.f64 a) x-scale))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 b b)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 b b)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (*.f64 (-.f64 (*.f64 x-scale x-scale) (*.f64 a a)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))) (*.f64 b y-scale)) 2)))))))) (*.f64 4 (*.f64 x-scale (*.f64 a (*.f64 (neg.f64 a) x-scale))))) (pow.f64 (*.f64 b y-scale) 2))
(*.f64 (pow.f64 (*.f64 b y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 a x-scale) 2)) (*.f64 (/.f64 (*.f64 8 (neg.f64 (pow.f64 (*.f64 a x-scale) 2))) (pow.f64 (*.f64 b y-scale) 2)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 b b)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 b b)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 2 (-.f64 (*.f64 x-scale x-scale) (*.f64 a a))) (/.f64 (*.f64 b y-scale) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))))))))) (neg.f64 (pow.f64 (*.f64 a x-scale) 2)))))
(*.f64 (pow.f64 (*.f64 b y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 a x-scale) 2)) (*.f64 (*.f64 (/.f64 8 (pow.f64 (*.f64 b y-scale) 2)) (neg.f64 (pow.f64 (*.f64 a x-scale) 2))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 b b)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 b b)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 x-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (-.f64 (*.f64 x-scale x-scale) (*.f64 a a))) (*.f64 b y-scale)) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))))))))))) (neg.f64 (pow.f64 (*.f64 a x-scale) 2)))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 y-scale a) (*.f64 y-scale (neg.f64 a)))) (pow.f64 (*.f64 x-scale b) 2))) (*.f64 (*.f64 y-scale a) (*.f64 y-scale (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) b) b)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) b) b)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 y-scale 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) b) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 y-scale a) (*.f64 y-scale (neg.f64 a)))) (pow.f64 (*.f64 x-scale b) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 b x-scale) 2) (*.f64 (*.f64 a y-scale) (*.f64 (neg.f64 a) y-scale)))) (*.f64 (*.f64 a y-scale) (*.f64 (neg.f64 a) y-scale)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 b b))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (*.f64 (-.f64 (*.f64 y-scale y-scale) (*.f64 a a)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))) (*.f64 b x-scale)) 2))))))) (/.f64 4 (/.f64 (pow.f64 (*.f64 b x-scale) 2) (*.f64 (*.f64 a y-scale) (*.f64 (neg.f64 a) y-scale)))))
(*.f64 (pow.f64 (*.f64 b x-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 a y-scale) 2)) (*.f64 (/.f64 (*.f64 8 (neg.f64 (pow.f64 (*.f64 a y-scale) 2))) (pow.f64 (*.f64 b x-scale) 2)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 b b)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 b b))) (*.f64 (/.f64 (*.f64 2 (-.f64 (*.f64 y-scale y-scale) (*.f64 a a))) b) (/.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale)))))))) (neg.f64 (pow.f64 (*.f64 a y-scale) 2)))))
(*.f64 (pow.f64 (*.f64 b x-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 a y-scale) 2)) (*.f64 (*.f64 (/.f64 8 (pow.f64 (*.f64 b x-scale) 2)) (neg.f64 (pow.f64 (*.f64 a y-scale) 2))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 b b)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 y-scale (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 b b))) (*.f64 (/.f64 (*.f64 2 (-.f64 (*.f64 y-scale y-scale) (*.f64 a a))) b) (/.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale)))))))) (neg.f64 (pow.f64 (*.f64 a y-scale) 2)))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 angle y-scale) 2))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2)) angle) angle) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2)) angle) angle) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 x-scale 180) (PI.f64)))) angle) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 angle y-scale) 2)))
(neg.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 (*.f64 4 (*.f64 b a)) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale angle) 2)) (*.f64 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 x-scale (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 x-scale (PI.f64)) 180))) 2)) (*.f64 angle angle)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 x-scale (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 x-scale (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 x-scale (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 x-scale (PI.f64)) 180))) 2)) (*.f64 angle angle)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 x-scale (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 x-scale (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (sin.f64 (/.f64 (*.f64 x-scale (PI.f64)) 180)) (cos.f64 (/.f64 (*.f64 x-scale (PI.f64)) 180)))) (*.f64 y-scale angle)) 2)))))))) (/.f64 (*.f64 (*.f64 4 (*.f64 b a)) (*.f64 b (neg.f64 a))) (pow.f64 (*.f64 y-scale angle) 2))))
(*.f64 (pow.f64 (*.f64 y-scale angle) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a)) (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a))) (pow.f64 (*.f64 y-scale angle) 2)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2)) (*.f64 angle angle)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2)) (*.f64 angle angle)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 2 (sin.f64 (*.f64 (PI.f64) (/.f64 x-scale 180))))) angle) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 x-scale 180))) y-scale)))))))) (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a)))))
(*.f64 (pow.f64 (*.f64 y-scale angle) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (neg.f64 b)))) (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b (neg.f64 b))))) (pow.f64 (*.f64 y-scale angle) 2)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2)) (*.f64 angle angle)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2)) (*.f64 angle angle)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 x-scale 180)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 2 (sin.f64 (*.f64 (PI.f64) (/.f64 x-scale 180))))) angle) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 x-scale 180))) y-scale)))))))) (*.f64 a (*.f64 a (*.f64 b (neg.f64 b)))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale angle) 2))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2)) angle) angle)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) 2)) angle) angle)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 y-scale 180) (PI.f64)))) x-scale) angle) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale angle) 2)))
(neg.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 (*.f64 4 (*.f64 b a)) (*.f64 b (neg.f64 a))) (pow.f64 (*.f64 x-scale angle) 2))) (*.f64 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2)) (*.f64 angle angle))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2)) (*.f64 angle angle))) 2) (pow.f64 (/.f64 (*.f64 (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180))))) (*.f64 x-scale angle)) 2))))))) (/.f64 (*.f64 (*.f64 4 (*.f64 b a)) (*.f64 b (neg.f64 a))) (pow.f64 (*.f64 x-scale angle) 2))))
(*.f64 (pow.f64 (*.f64 x-scale angle) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a)) (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a))) (pow.f64 (*.f64 x-scale angle) 2)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2)) (*.f64 angle angle)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2)) (*.f64 angle angle))) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 2 (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180))))) x-scale) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180))) angle)))))))) (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a)))))
(*.f64 (pow.f64 (*.f64 x-scale angle) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (neg.f64 b)))) (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b (neg.f64 b))))) (pow.f64 (*.f64 x-scale angle) 2)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2)) (*.f64 angle angle)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180)))) 2)) (*.f64 angle angle))) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 2 (sin.f64 (*.f64 (PI.f64) (/.f64 y-scale 180))))) x-scale) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 y-scale 180))) angle)))))))) (*.f64 a (*.f64 a (*.f64 b (neg.f64 b)))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale x-scale) 2))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) y-scale) x-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale x-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))) (*.f64 2 (/.f64 (*.f64 (*.f64 4 (*.f64 b a)) (*.f64 b (neg.f64 a))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2) (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale))) 2))))))) (/.f64 (*.f64 (*.f64 4 (*.f64 b a)) (*.f64 b (neg.f64 a))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a)) (/.f64 (*.f64 8 (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a))) (pow.f64 (*.f64 x-scale y-scale) 2))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (/.f64 (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale)) (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (*.f64 a (*.f64 (*.f64 b (neg.f64 b)) a)))))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (neg.f64 b)))) (*.f64 (/.f64 8 (pow.f64 (*.f64 x-scale y-scale) 2)) (*.f64 a (*.f64 a (*.f64 b (neg.f64 b)))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (/.f64 (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale)) (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (*.f64 a (*.f64 a (*.f64 b (neg.f64 b)))))))
Compiler

Compiled 193 to 129 computations (33.2% saved)

simplify64.0ms (0%)

Algorithm
egg-herbie
Rules
1758×distribute-lft-neg-out
1336×times-frac
1294×associate-*r*
1148×associate-*l*
654×distribute-rgt-out
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
060583
1162557
2675557
35646553
Stop Event
node limit
Counts
1 → 5
Calls
Call 1
Inputs
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))
Outputs
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (neg.f64 a) (*.f64 b (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (neg.f64 a) (*.f64 a (*.f64 b b)))))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))

eval11.0ms (0%)

Compiler

Compiled 895 to 542 computations (39.4% saved)

prune12.0ms (0%)

Pruning

3 alts after pruning (3 fresh and 0 done)

PrunedKeptTotal
New235
Fresh101
Picked000
Done000
Total336
Accurracy
1.3%
Counts
6 → 3
Alt Table
Click to see full alt table
StatusAccuracyProgram
1.2%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))))
1.2%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
0.9%
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2))
Compiler

Compiled 547 to 352 computations (35.6% saved)

localize699.0ms (0.5%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
57.4%
(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
57.0%
(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
52.5%
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))))
35.5%
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2))
Compiler

Compiled 1751 to 998 computations (43% saved)

series434.0ms (0.3%)

Counts
4 → 144
Calls

36 calls:

TimeVariablePointExpression
49.0ms
a
@-inf
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))))
46.0ms
b
@inf
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2))
28.0ms
angle
@0
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2))
23.0ms
a
@0
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2))
20.0ms
angle
@-inf
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2))

rewrite124.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1432×add-sqr-sqrt
1410×*-un-lft-identity
1320×add-exp-log
1318×add-cbrt-cube
1318×add-cube-cbrt
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0611186
114131186
Stop Event
node limit
Counts
4 → 36
Calls
Call 1
Inputs
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))))
(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
Outputs
(((/.f64 (*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((pow.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((log.f64 (exp.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((cbrt.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((exp.f64 (log.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)))
(((*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (/.f64 1 (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((*.f64 1 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((*.f64 (sqrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (sqrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((*.f64 (*.f64 (cbrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (cbrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (cbrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((pow.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((neg.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2)))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((log.f64 (exp.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((cbrt.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((exp.f64 (log.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)))
(((*.f64 1 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((*.f64 (sqrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (sqrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((*.f64 (*.f64 (cbrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (cbrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) (cbrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((pow.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((log.f64 (exp.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((cbrt.f64 (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((exp.f64 (log.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)))
(((*.f64 1 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((*.f64 (sqrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (sqrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((*.f64 (*.f64 (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((pow.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((log.f64 (exp.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((cbrt.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((exp.f64 (log.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) #f)))

simplify1.7s (1.2%)

Algorithm
egg-herbie
Rules
1478×associate-*r/
1266×+-commutative
1218×*-commutative
1052×associate-*l/
762×associate-+r+
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01408302510
15166302510
Stop Event
node limit
Counts
180 → 393
Calls
Call 1
Inputs
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 y-scale 2) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 y-scale 2) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 6) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 y-scale 2) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 b 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 b 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 b 6) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 b 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 y-scale (sqrt.f64 8)))) (pow.f64 b 5)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 y-scale (sqrt.f64 8)))) (pow.f64 b 5)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (*.f64 (pow.f64 a 6) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 8)))) (pow.f64 a 5)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 8)))) (pow.f64 a 5)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b)))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) 2)) (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 1/22674816000000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 y-scale x-scale))) (+.f64 (*.f64 1/4534963200000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 y-scale x-scale))) (*.f64 1/2267481600000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 y-scale x-scale))))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))))))) (*.f64 (sqrt.f64 2) b))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 b 6) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))))))
(*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 5)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 5)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) 2)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 6) (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) 2)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))))
(*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 5)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 5)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(*.f64 1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2)))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) 2)) (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 1/22674816000000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 y-scale x-scale))) (+.f64 (*.f64 1/4534963200000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 y-scale x-scale))) (*.f64 1/2267481600000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 y-scale x-scale))))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2)))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
1
(+.f64 1 (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 (*.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(*.f64 1/180 (*.f64 angle (PI.f64)))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (*.f64 1/180 (*.f64 angle (PI.f64))))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (*.f64 1/180 (*.f64 angle (PI.f64))) (*.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (*.f64 1/180 (*.f64 angle (PI.f64))) (+.f64 (*.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (*.f64 -1/30855889612800000000 (*.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(pow.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) 1)
(log.f64 (exp.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(cbrt.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(expm1.f64 (log1p.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(exp.f64 (log.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(log1p.f64 (expm1.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (/.f64 1 (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(*.f64 1 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (sqrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(*.f64 (*.f64 (cbrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (cbrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (cbrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(pow.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) 1)
(neg.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2)))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(log.f64 (exp.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(cbrt.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(expm1.f64 (log1p.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(exp.f64 (log.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(log1p.f64 (expm1.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(*.f64 1 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))
(*.f64 (sqrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (sqrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(*.f64 (*.f64 (cbrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (cbrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) (cbrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(pow.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) 1)
(log.f64 (exp.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(cbrt.f64 (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(expm1.f64 (log1p.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(exp.f64 (log.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(log1p.f64 (expm1.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(*.f64 1 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))
(*.f64 (sqrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (sqrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(*.f64 (*.f64 (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(pow.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) 1)
(log.f64 (exp.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(cbrt.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(expm1.f64 (log1p.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(exp.f64 (log.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(log1p.f64 (expm1.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
Outputs
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))
(fma.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (*.f64 (*.f64 y-scale (pow.f64 x-scale 4)) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))
(fma.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (*.f64 (*.f64 y-scale (pow.f64 x-scale 4)) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (pow.f64 x-scale 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) 2))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))))
(fma.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (fma.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 x-scale 6) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (/.f64 (*.f64 -1/2 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) x-scale) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) x-scale) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) x-scale) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) 2)))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) x-scale) (fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2)))) (pow.f64 x-scale 3))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) x-scale) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) 2))))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) x-scale) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))))))) (fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2)))) (pow.f64 x-scale 3)))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) x-scale) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) x-scale) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) x-scale) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) 2)))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) x-scale) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2)))) (pow.f64 x-scale 3))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) x-scale) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) 2)))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) x-scale) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2)))) (pow.f64 x-scale 3))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 y-scale 2) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))) (*.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (*.f64 (sqrt.f64 8) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))) (*.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))) (*.f64 (sqrt.f64 8) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 y-scale 2) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))) (*.f64 1/8 (+.f64 (*.f64 x-scale (*.f64 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (*.f64 (sqrt.f64 8) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (*.f64 (*.f64 x-scale (pow.f64 y-scale 4)) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))) (*.f64 1/8 (+.f64 (*.f64 x-scale (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))) (*.f64 (sqrt.f64 8) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))) (*.f64 x-scale (*.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 6) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 y-scale 2) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 6) (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))) 2)) (/.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))) (*.f64 1/8 (+.f64 (*.f64 x-scale (*.f64 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (*.f64 (sqrt.f64 8) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (*.f64 (*.f64 x-scale (pow.f64 y-scale 4)) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale 6) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))) 2)) (/.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))) (*.f64 1/8 (+.f64 (*.f64 x-scale (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))) (*.f64 (sqrt.f64 8) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))) (*.f64 x-scale (*.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (sqrt.f64 8)) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (sqrt.f64 8)) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) 2)))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (sqrt.f64 8)) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)))))) (fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))))))))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) 2)))))) (fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))))))))))
(*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (sqrt.f64 8)) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(fma.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (*.f64 -1/8 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (sqrt.f64 8)) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))
(fma.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/8 (+.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))))))) (fma.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (sqrt.f64 8)) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))))))) (fma.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/8 (+.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 b 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (*.f64 b b)) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 b 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) 2))) (*.f64 (sqrt.f64 8) (pow.f64 b 4))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (*.f64 b b)) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) 2)) (*.f64 (sqrt.f64 8) (pow.f64 b 4)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 b 6) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 b 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (pow.f64 b 6) (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) 2)))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) 2))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) 2))) (*.f64 (sqrt.f64 8) (pow.f64 b 4))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (*.f64 b b)) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 b 6) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)))))) (/.f64 (*.f64 -1/2 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) 2)))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) 2)) (*.f64 (sqrt.f64 8) (pow.f64 b 4)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) b)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (*.f64 1/8 (*.f64 (/.f64 y-scale (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))))))
(fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) b)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (*.f64 1/8 (+.f64 (*.f64 (/.f64 y-scale (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 b 3) (*.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (sqrt.f64 8))))))))
(fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 1/8 (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) y-scale) (/.f64 (pow.f64 b 3) (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 y-scale (sqrt.f64 8)))) (pow.f64 b 5)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) b)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (fma.f64 1/8 (*.f64 (/.f64 y-scale (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 b 3) (*.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 x-scale (+.f64 (*.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) (*.f64 y-scale (sqrt.f64 8))) (pow.f64 b 5)))))))
(fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 1/8 (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) y-scale) (/.f64 (pow.f64 b 3) (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)))))) (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 (pow.f64 b 5) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))) (/.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))
(fma.f64 -1/8 (*.f64 (/.f64 y-scale (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))))
(fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(fma.f64 -1/8 (*.f64 (/.f64 y-scale (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 b 3) (*.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (sqrt.f64 8))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) y-scale) (/.f64 (pow.f64 b 3) (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 y-scale (sqrt.f64 8)))) (pow.f64 b 5)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 -1/8 (*.f64 (/.f64 y-scale (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 x-scale (+.f64 (*.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) (*.f64 y-scale (sqrt.f64 8))) (pow.f64 b 5))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 b 3) (*.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (sqrt.f64 8))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 (pow.f64 b 5) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))) (/.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))) (fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) y-scale) (/.f64 (pow.f64 b 3) (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2))))))) (*.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (*.f64 a a)) (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))))))) (*.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (*.f64 a a) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2))))))) (*.f64 1/8 (+.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (*.f64 a a)) (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))))))) 2))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))))))) (*.f64 1/8 (+.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (*.f64 a a) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2))))))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (*.f64 (pow.f64 a 6) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (*.f64 a a)) (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))))))) 2))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) 2)) (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))))) (*.f64 (sqrt.f64 8) (pow.f64 a 6))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (*.f64 a a) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))))))) (*.f64 1/8 (+.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2))))))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (/.f64 (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))))))) 2)) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))))))) (*.f64 (sqrt.f64 8) (pow.f64 a 6))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))))))) a) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))))))) a) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))))) 2)))) (pow.f64 a 3))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 a 3) (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))))))) (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 8)))) (pow.f64 a 5)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))))))) a) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))))) (pow.f64 a 5))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))))) 2)))) (pow.f64 a 3))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) y-scale) (/.f64 (pow.f64 a 5) (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2))) (/.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 a 3) (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))))))) (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))))
(*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))))) (*.f64 -1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))))))) a)))
(fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) a)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))))) 2)))) (pow.f64 a 3))) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))))) (*.f64 -1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))))))) a))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 a 3) (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))))))) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) a)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 8)))) (pow.f64 a 5)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))))) (pow.f64 a 5))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))))) 2)))) (pow.f64 a 3))) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))))) (*.f64 -1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))))))) a)))))
(fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) y-scale) (/.f64 (pow.f64 a 5) (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2))) (/.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 a 3) (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))))))) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) a)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
(+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 (*.f64 y-scale (*.f64 angle angle)) (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))))) b))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (/.f64 (*.f64 1/8 (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (sqrt.f64 2)) (*.f64 y-scale (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b)))))
(fma.f64 1/8 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 y-scale (pow.f64 angle 4)) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 2/45 (*.f64 (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) y-scale) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))))) 2)))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 (*.f64 y-scale (*.f64 angle angle)) (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))))) b)))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (fma.f64 2/45 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) y-scale) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) b))) 2))))) b)) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (/.f64 (*.f64 1/8 (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (sqrt.f64 2)) (*.f64 y-scale (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))))))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) 2)) (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 1/22674816000000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 y-scale x-scale))) (+.f64 (*.f64 1/4534963200000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 y-scale x-scale))) (*.f64 1/2267481600000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 y-scale x-scale))))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))))))) (*.f64 (sqrt.f64 2) b))))))
(fma.f64 1/8 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 y-scale (pow.f64 angle 4)) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 2/45 (*.f64 (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) y-scale) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))))) 2)))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 1/8 (+.f64 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 (*.f64 y-scale (*.f64 angle angle)) (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))))) b)) (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 b (sqrt.f64 2)) (*.f64 y-scale (*.f64 (*.f64 (pow.f64 angle 6) (sqrt.f64 8)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (/.f64 (*.f64 1/2 (+.f64 (fma.f64 2 (*.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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))))) (fma.f64 4 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) 2) (*.f64 2/45 (/.f64 (fma.f64 1/22674816000000 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 5))) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 5))) 1/1511654400000)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (*.f64 -1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2) (/.f64 (*.f64 2/45 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000)) (PI.f64))) (*.f64 y-scale x-scale))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 1/2 (*.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2) (/.f64 (*.f64 2/45 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000)) (PI.f64))) (*.f64 y-scale x-scale))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))))) (*.f64 b (sqrt.f64 2))) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))))) (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2)))))))))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (fma.f64 2/45 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) y-scale) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) b))) 2))))) b)) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 1/8 (+.f64 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))))) b)) (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (*.f64 1/2 (/.f64 (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale))))) (fma.f64 4 (pow.f64 (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) 2) (*.f64 2/45 (*.f64 (/.f64 (fma.f64 1/22674816000000 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 1/1511654400000) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)))) y-scale) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale)))))) (/.f64 (*.f64 1/2 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2)) (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2)) (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) b))) 2))))))))))) b))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))))
(*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))))
(+.f64 (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale))))))
(+.f64 (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 y-scale (sqrt.f64 8)))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (*.f64 x-scale x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))) (*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 y-scale (sqrt.f64 8)))) (fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) 2))))) (*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))))))
(+.f64 (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 y-scale (sqrt.f64 8)))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (*.f64 x-scale x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))) (fma.f64 1/8 (/.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) y-scale) (*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 y-scale (sqrt.f64 8)))) (fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) 2))))) (fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (pow.f64 x-scale 4)) (/.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (/.f64 (*.f64 -1/2 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)))))))) (*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))
(*.f64 (/.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale)))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale)))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 7)) (sqrt.f64 8)))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale)))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 7)) (sqrt.f64 8)))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale)))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale)))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (/.f64 (*.f64 -1/8 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 7)) (sqrt.f64 8))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 7)) (sqrt.f64 8))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (/.f64 x-scale (sqrt.f64 8)))) (*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))) (/.f64 x-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (/.f64 x-scale (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))) x-scale))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))) (/.f64 x-scale (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 (*.f64 y-scale y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 4) (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))) 2)) (/.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))) x-scale) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (/.f64 x-scale (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))) x-scale)))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 (pow.f64 y-scale 4) (/.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))) 2)) (/.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))) (/.f64 x-scale (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 (*.f64 y-scale y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2))))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(*.f64 (/.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (*.f64 (/.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)) (/.f64 (*.f64 x-scale (pow.f64 y-scale 5)) (sqrt.f64 8)))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)) (/.f64 (*.f64 x-scale (pow.f64 y-scale 5)) (sqrt.f64 8))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 -1/8 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)) (/.f64 (*.f64 x-scale (pow.f64 y-scale 5)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 -1/8 (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))) 2)) (/.f64 (*.f64 x-scale (pow.f64 y-scale 5)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) 2)) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (pow.f64 b 4)) y-scale))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) 2)) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (pow.f64 b 4)) y-scale))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 b 6) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) 2)) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (pow.f64 b 4)) y-scale))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (*.f64 (/.f64 (pow.f64 b 6) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) 2)))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) 2))))))) y-scale)))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) 2)) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (pow.f64 b 4)) y-scale))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (*.f64 (/.f64 (pow.f64 b 6) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)))))) (/.f64 (*.f64 -1/2 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) 2)))))) y-scale)))))))
(*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale b)) (sqrt.f64 8))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale b)) (sqrt.f64 8))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale b)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (pow.f64 b 3))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale b)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (pow.f64 b 3))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 5)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (/.f64 (+.f64 (*.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 b 5))) (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale b)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (pow.f64 b 3)))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))) (/.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 b 5))) (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale b)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (pow.f64 b 3)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (*.f64 -1/8 (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale b)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale b)) (sqrt.f64 8))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (pow.f64 b 3))))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (*.f64 -1/8 (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale b)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (pow.f64 b 3))))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale b)) (sqrt.f64 8)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 5)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (/.f64 (+.f64 (*.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (/.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 b 5))) (sqrt.f64 8)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (pow.f64 b 3))))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (*.f64 -1/8 (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale b)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))) (/.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 b 5))) (sqrt.f64 8)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (pow.f64 b 3))))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale b)) (sqrt.f64 8))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) y-scale))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))
(fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))))) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) 2)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) y-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (pow.f64 a 4) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))))))) 2))) y-scale))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))))) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))))) (*.f64 (/.f64 (pow.f64 a 4) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2))))))))) 2))) y-scale))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 6) (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) 2)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) y-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (pow.f64 a 6) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) 2)) (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))))) y-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (pow.f64 a 4) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (fma.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))))))) 2))) y-scale))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))))
(fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))))) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))))) (*.f64 (/.f64 (pow.f64 a 6) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (/.f64 (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))))))) 2)) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))))))) y-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))))))))) (*.f64 (/.f64 (pow.f64 a 4) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2))))))))) 2))) y-scale))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))))
(*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale)))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale)))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (pow.f64 a 3))))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 a 3))) (sqrt.f64 8)))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 5)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 a 5))) (sqrt.f64 8)))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (pow.f64 a 3))))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale)))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2))) (/.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 a 5))) (sqrt.f64 8)))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 a 3))) (sqrt.f64 8)))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale)))))))
(*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale)))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale)))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (pow.f64 a 3))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 a 3))) (sqrt.f64 8)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 5)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (pow.f64 a 3))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 a 5))) (sqrt.f64 8))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 a 3))) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2))) (/.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 a 5))) (sqrt.f64 8))))))))
(*.f64 1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2))))
(/.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 y-scale (*.f64 x-scale x-scale)))
(*.f64 1/4 (/.f64 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 y-scale (*.f64 x-scale x-scale))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2)))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 angle angle) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (*.f64 y-scale b))) (/.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 y-scale (*.f64 x-scale x-scale))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 angle angle) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (*.f64 y-scale b))) (*.f64 1/4 (/.f64 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 y-scale (*.f64 x-scale x-scale)))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2))))))
(fma.f64 1/8 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 2/45 (*.f64 (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) y-scale) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))))) 2))) (*.f64 y-scale b))) (fma.f64 1/8 (*.f64 (/.f64 (*.f64 angle angle) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (*.f64 y-scale b))) (/.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 y-scale (*.f64 x-scale x-scale)))))
(fma.f64 1/8 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (fma.f64 2/45 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) y-scale) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) b))) 2))) (*.f64 y-scale b))) (fma.f64 1/8 (*.f64 (/.f64 (*.f64 angle angle) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (*.f64 y-scale b))) (*.f64 1/4 (/.f64 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 y-scale (*.f64 x-scale x-scale))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) 2)) (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 1/22674816000000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 y-scale x-scale))) (+.f64 (*.f64 1/4534963200000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 y-scale x-scale))) (*.f64 1/2267481600000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 y-scale x-scale))))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2)))))))
(fma.f64 1/8 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 2/45 (*.f64 (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) y-scale) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))))) 2))) (*.f64 y-scale b))) (fma.f64 1/8 (*.f64 (/.f64 (*.f64 angle angle) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (*.f64 y-scale b))) (fma.f64 1/8 (*.f64 (/.f64 (pow.f64 angle 6) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (/.f64 (*.f64 1/2 (+.f64 (fma.f64 2 (*.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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))))) (fma.f64 4 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) 2) (*.f64 2/45 (/.f64 (fma.f64 1/22674816000000 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 5))) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 5))) 1/1511654400000)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (*.f64 -1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2) (/.f64 (*.f64 2/45 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000)) (PI.f64))) (*.f64 y-scale x-scale))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 1/2 (*.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2) (/.f64 (*.f64 2/45 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000)) (PI.f64))) (*.f64 y-scale x-scale))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))))) (*.f64 b (sqrt.f64 2))) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))))) (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2)))))) (*.f64 y-scale b))) (/.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 y-scale (*.f64 x-scale x-scale))))))
(fma.f64 1/8 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (fma.f64 2/45 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) y-scale) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) b))) 2))) (*.f64 y-scale b))) (fma.f64 1/8 (*.f64 (/.f64 (*.f64 angle angle) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (*.f64 y-scale b))) (fma.f64 1/8 (*.f64 (/.f64 (pow.f64 angle 6) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (*.f64 1/2 (/.f64 (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale))))) (fma.f64 4 (pow.f64 (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) 2) (*.f64 2/45 (*.f64 (/.f64 (fma.f64 1/22674816000000 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 1/1511654400000) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)))) y-scale) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale)))))) (/.f64 (*.f64 1/2 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2)) (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) 2)) (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (*.f64 y-scale y-scale))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 4)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) b))) 2))))))))) (*.f64 y-scale b))) (*.f64 1/4 (/.f64 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 y-scale (*.f64 x-scale x-scale)))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
1
(+.f64 1 (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (*.f64 -1/64800 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2))))
(+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 1 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 -1/64800 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2)))))
(+.f64 (*.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(fma.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6)) (+.f64 1 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 -1/64800 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2))))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(*.f64 1/180 (*.f64 angle (PI.f64)))
(*.f64 (*.f64 1/180 angle) (PI.f64))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (*.f64 1/180 (*.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (*.f64 (*.f64 1/180 angle) (PI.f64)))
(fma.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (*.f64 1/180 (*.f64 angle (PI.f64))))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (*.f64 1/180 (*.f64 angle (PI.f64))) (*.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (*.f64 angle (PI.f64)) (*.f64 1/22674816000000 (*.f64 (pow.f64 (PI.f64) 5) (pow.f64 angle 5)))))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (*.f64 1/180 (*.f64 angle (PI.f64))) (+.f64 (*.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (*.f64 -1/30855889612800000000 (*.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (*.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (*.f64 (pow.f64 (PI.f64) 5) (pow.f64 angle 5)) (*.f64 (*.f64 -1/30855889612800000000 (pow.f64 angle 7)) (pow.f64 (PI.f64) 7)))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (*.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (*.f64 (pow.f64 (PI.f64) 5) (pow.f64 angle 5)) (*.f64 -1/30855889612800000000 (*.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (pow.f64 (*.f64 x-scale y-scale) 2)) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale x-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 y-scale x-scale) 2)))
(pow.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) 1)
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale x-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 y-scale x-scale) 2)))
(log.f64 (exp.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale x-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 y-scale x-scale) 2)))
(cbrt.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(cbrt.f64 (*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale x-scale) 2))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale x-scale) 2))) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale x-scale) 2))))))
(cbrt.f64 (*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 y-scale x-scale) 2))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 y-scale x-scale) 2))) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 y-scale x-scale) 2))))))
(expm1.f64 (log1p.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale x-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 y-scale x-scale) 2)))
(exp.f64 (log.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale x-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 y-scale x-scale) 2)))
(log1p.f64 (expm1.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 y-scale x-scale) 2)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 y-scale x-scale) 2)))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (/.f64 1 (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(*.f64 1 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (sqrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(*.f64 (*.f64 (cbrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (cbrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (cbrt.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(pow.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) 1)
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(neg.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2)))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(log.f64 (exp.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(cbrt.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(cbrt.f64 (*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))))))
(cbrt.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(expm1.f64 (log1p.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(exp.f64 (log.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(log1p.f64 (expm1.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 b a)) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a))))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))))
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (*.f64 2 (*.f64 4 (*.f64 b a))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 b a)))) (*.f64 b (neg.f64 a))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (/.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 y-scale (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))))) 2)))))))) (/.f64 1/4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(*.f64 1 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))
(cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(*.f64 (sqrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (sqrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(*.f64 (*.f64 (cbrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (cbrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) (cbrt.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(pow.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) 1)
(cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(log.f64 (exp.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(cbrt.f64 (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(cbrt.f64 (*.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (*.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))))))
(expm1.f64 (log1p.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(exp.f64 (log.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(log1p.f64 (expm1.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(*.f64 1 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))
(sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(*.f64 (sqrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (sqrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(*.f64 (*.f64 (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(pow.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) 1)
(sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(log.f64 (exp.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(cbrt.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(cbrt.f64 (*.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (*.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))))))
(expm1.f64 (log1p.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(exp.f64 (log.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))
(log1p.f64 (expm1.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))
(sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))

localize595.0ms (0.4%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
57.4%
(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
57.0%
(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
48.8%
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
35.5%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
Compiler

Compiled 1612 to 927 computations (42.5% saved)

series368.0ms (0.3%)

Counts
2 → 120
Calls

30 calls:

TimeVariablePointExpression
35.0ms
b
@inf
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
28.0ms
b
@0
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
23.0ms
a
@0
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
22.0ms
b
@0
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
19.0ms
a
@0
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))

rewrite108.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1500×add-sqr-sqrt
1472×*-un-lft-identity
1380×add-exp-log
1378×add-cbrt-cube
1378×add-cube-cbrt
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0641084
114721084
Stop Event
node limit
Counts
2 → 18
Calls
Call 1
Inputs
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
Outputs
(((/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((pow.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((neg.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (pow.f64 (*.f64 x-scale y-scale) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((log.f64 (exp.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((cbrt.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((exp.f64 (log.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)))
(((*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (/.f64 1 (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((*.f64 1 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((*.f64 (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((*.f64 (*.f64 (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((pow.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((log.f64 (exp.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((exp.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)))

simplify2.0s (1.4%)

Algorithm
egg-herbie
Rules
1834×associate-*r/
1448×*-commutative
1356×+-commutative
796×associate-+r+
674×associate-*r*
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01558285252
16234285252
Stop Event
node limit
Counts
138 → 348
Calls
Call 1
Inputs
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 x-scale (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 x-scale (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) 2)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 (pow.f64 b 3) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8)))) (pow.f64 b 2)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2))))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2))))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 8)))) (pow.f64 b 2)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 3) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 -8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 b 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8)))) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8)))) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 6) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 6) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))))
(+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b)))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (+.f64 (*.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (*.f64 1/22674816000000 (*.f64 (pow.f64 (PI.f64) 5) (+.f64 a b))))) (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) 2)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 (pow.f64 b 3) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))))
(*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2))) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2))) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 3) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 -8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 b 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) y-scale))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) y-scale))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) y-scale))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) 2)))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) 2)))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2)))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (+.f64 (*.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (*.f64 1/22674816000000 (*.f64 (pow.f64 (PI.f64) 5) (+.f64 a b))))) (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2)))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) 1)
(neg.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(log.f64 (exp.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(cbrt.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(expm1.f64 (log1p.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(exp.f64 (log.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(log1p.f64 (expm1.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (/.f64 1 (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(*.f64 1 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(*.f64 (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(*.f64 (*.f64 (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) 1)
(log.f64 (exp.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(expm1.f64 (log1p.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(exp.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(log1p.f64 (expm1.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
Outputs
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) (*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 x-scale (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) 2)) (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) (*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))))
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) y-scale))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 x-scale (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) 2)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 (pow.f64 b 3) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) 2)) (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))))) (+.f64 (*.f64 8 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))))) (*.f64 y-scale x-scale))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) 2)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))))))) (*.f64 (sqrt.f64 8) (pow.f64 b 3))))) (*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))))
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) y-scale))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 (*.f64 -4 (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)))) 2))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))) (*.f64 (sqrt.f64 8) (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 (*.f64 4 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) b))))
(fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))))) b)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8)))) (pow.f64 b 2)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (fma.f64 1/8 (*.f64 (/.f64 y-scale (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) y-scale))) (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 (*.f64 4 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 -2 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 (*.f64 4 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))) 2)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 (*.f64 4 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) b)))))
(fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (fma.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (/.f64 (*.f64 -8 (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))))) (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))))) (*.f64 b b)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))))) b)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2))))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) b) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) b) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2))))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 8)))) (pow.f64 b 2)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) b) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 y-scale (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) y-scale))) (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) y-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) 2))) x-scale)))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (/.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))) 2)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))))) (sqrt.f64 8))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) b) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 y-scale (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) y-scale))) (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))))))))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (/.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))
(fma.f64 1/2 (*.f64 a (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(fma.f64 1/2 (*.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 1/2 (*.f64 a (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (*.f64 a a)) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(fma.f64 1/2 (*.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (*.f64 a a) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 3) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 -8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 b 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 1/2 (*.f64 a (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (pow.f64 a 3) (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))))) (+.f64 (/.f64 (*.f64 -8 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))))) (*.f64 y-scale x-scale)) (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))) 2))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))))))))) (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))) (sqrt.f64 8)))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (*.f64 a a)) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(fma.f64 1/2 (*.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 3) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (+.f64 (*.f64 -8 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))) 2))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))) (*.f64 -2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))) 2))))))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (*.f64 a a) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (fma.f64 1/8 (*.f64 (/.f64 y-scale (/.f64 a (*.f64 (*.f64 x-scale (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))) 2))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))
(fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) a) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8)))) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) y-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) 2)) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))))))))) (*.f64 a a))) (fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (fma.f64 1/8 (*.f64 (/.f64 y-scale (/.f64 a (*.f64 (*.f64 x-scale (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))) 2))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (/.f64 (*.f64 8 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))) (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2)))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))))) (*.f64 a a))) (fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) a) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (fma.f64 -1/8 (*.f64 (/.f64 y-scale (/.f64 a (*.f64 (*.f64 x-scale (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))) 2))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))) (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) a) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8)))) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) y-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) 2)) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))))))))) (*.f64 a a))) (fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (fma.f64 -1/8 (*.f64 (/.f64 y-scale (/.f64 a (*.f64 (*.f64 x-scale (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))) 2))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))) (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (/.f64 (*.f64 8 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))) (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2)))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))))) (*.f64 a a))) (fma.f64 -1/2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) a) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (sqrt.f64 8)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (sqrt.f64 8)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (*.f64 (*.f64 y-scale (pow.f64 x-scale 4)) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 6) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 x-scale 6) (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2)) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (neg.f64 (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (sqrt.f64 8)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (*.f64 (*.f64 y-scale (pow.f64 x-scale 4)) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 x-scale 6) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 -1/2 (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) x-scale)))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) x-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2))) (sqrt.f64 8)) (pow.f64 x-scale 3))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) x-scale))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) 2)))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) x-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2))) (sqrt.f64 8)) (pow.f64 x-scale 3))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (*.f64 1/8 (+.f64 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 3) (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 x-scale 5))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) 2)))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))) (*.f64 1/8 (+.f64 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) x-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 3) (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2))))) (*.f64 1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale 5))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))))
(*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (*.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) x-scale)))
(fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) x-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2))) (sqrt.f64 8)) (pow.f64 x-scale 3))) (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) x-scale))))
(fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))) (*.f64 -1/8 (+.f64 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) x-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 3) (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 x-scale 5)) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2))) (sqrt.f64 8)) (pow.f64 x-scale 3))) (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) x-scale)))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 3) (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2))))) (*.f64 1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale 5)) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))) (*.f64 -1/8 (+.f64 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) x-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(*.f64 (*.f64 1/4 (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))))
(fma.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (*.f64 (*.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 4) (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (fma.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (*.f64 (*.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 6) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (*.f64 (*.f64 x-scale (pow.f64 y-scale 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2)) (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) 2))) (/.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 4) (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale 6) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2)) (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (/.f64 (*.f64 -1/2 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2))) (/.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (fma.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (*.f64 (*.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 1/8 (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 1/8 (+.f64 (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2))) (pow.f64 y-scale 3))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 1/8 (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))))) (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2))) (pow.f64 y-scale 3)))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))))) (*.f64 1/8 (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (/.f64 (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))))))))))
(*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 -1/8 (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2))) (pow.f64 y-scale 3))) (fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 -1/8 (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2))))) (fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2))) (pow.f64 y-scale 3))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))))))) (fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 -1/8 (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (/.f64 (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))))))) (fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))))
(+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (sqrt.f64 8))) (*.f64 b (sqrt.f64 2)))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) b))))
(+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b)))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 1/8 (+.f64 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (sqrt.f64 8))) (*.f64 b (sqrt.f64 2))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 (*.f64 y-scale (pow.f64 angle 4)) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2))))) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 2))) 2)))) b)))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 1/8 (+.f64 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) b)) (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 2)))) 2))))) b)))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (+.f64 (*.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (*.f64 1/22674816000000 (*.f64 (pow.f64 (PI.f64) 5) (+.f64 a b))))) (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (*.f64 (pow.f64 angle 6) (sqrt.f64 8)) (-.f64 (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 2/45 (*.f64 (/.f64 (fma.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (fma.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (*.f64 (*.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 x-scale x-scale))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) 2))) (*.f64 2 (+.f64 (*.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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))))))))) (*.f64 -1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2))))) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (/.f64 (*.f64 1/2 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2))))) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) b))) 2)))) (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2)))))) (*.f64 b (sqrt.f64 2))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 1/8 (+.f64 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (sqrt.f64 8))) (*.f64 b (sqrt.f64 2))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 (*.f64 y-scale (pow.f64 angle 4)) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2))))) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 2))) 2)))) b))))))
(fma.f64 1/8 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 b (sqrt.f64 2)) (*.f64 y-scale (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (+.f64 (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 2/45 (*.f64 (/.f64 (fma.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (fma.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (*.f64 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) 1/22674816000000))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 x-scale x-scale))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2))) (*.f64 2 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (*.f64 x-scale x-scale)) (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))))))))) (/.f64 (*.f64 -1/2 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (*.f64 y-scale y-scale)))))) (*.f64 -1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 2)))) 2)))))))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 1/8 (+.f64 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) b)) (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 2)))) 2))))) b))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) b))) (*.f64 y-scale y-scale)))) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) b))) (*.f64 y-scale y-scale)))) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) b))) (*.f64 y-scale y-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) 2)) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (*.f64 b b)) y-scale))) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) b))) (*.f64 y-scale y-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) y-scale))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (*.f64 b b)) y-scale))) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) 2)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 (pow.f64 b 3) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))))) (+.f64 (*.f64 8 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))))) (*.f64 y-scale x-scale))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) 2)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))))))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (pow.f64 b 3))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) b))) (*.f64 y-scale y-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) 2)) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (*.f64 b b)) y-scale))) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 (*.f64 -4 (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)))) 2))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (pow.f64 b 3))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) b))) (*.f64 y-scale y-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) y-scale))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (*.f64 b b)) y-scale))) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (*.f64 4 (pow.f64 a 4)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))))
(*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (*.f64 -1/4 (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 (*.f64 4 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 (*.f64 4 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) y-scale))) (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 (*.f64 4 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 -2 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 (*.f64 4 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))) 2)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 b b))))) (*.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (/.f64 (*.f64 -8 (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))))) (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -4 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 b b))))) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))))
(*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (*.f64 1/4 (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2))) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (sqrt.f64 8) x-scale) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))) 2)) (*.f64 y-scale b)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (sqrt.f64 8) x-scale) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)) (*.f64 y-scale b)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2))) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (sqrt.f64 8) x-scale) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))) 2)) (*.f64 y-scale b)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 -1/8 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) y-scale))) (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) y-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) 2))) x-scale)))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (/.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))) 2)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (sqrt.f64 8) x-scale) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)) (*.f64 y-scale b)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) y-scale))) (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))))))))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (/.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) 2) (/.f64 (*.f64 -8 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 b b)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 -1/2 (/.f64 a (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (*.f64 b b)))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 -1/2 (*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)))))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 -1/2 (/.f64 a (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (*.f64 b b)))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))) 2)))) (*.f64 y-scale x-scale))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 -1/2 (*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 3) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 -8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 b 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)))))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 a (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (*.f64 b b)))))))) (*.f64 (*.f64 -1/8 (/.f64 (pow.f64 a 3) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))))) (+.f64 (/.f64 (*.f64 -8 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))))) (*.f64 y-scale x-scale)) (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))) 2))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))))))))) (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))) 2)))) (*.f64 y-scale x-scale))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (*.f64 y-scale y-scale)))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (/.f64 (*.f64 (/.f64 (pow.f64 a 3) x-scale) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (+.f64 (*.f64 -8 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))) 2))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))) (*.f64 -2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))) 2)))))))))) y-scale))))))
(*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 y-scale y-scale))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 y-scale y-scale)))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale a)))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))) (*.f64 x-scale (*.f64 y-scale a)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 y-scale y-scale)))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))) (/.f64 (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) y-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) 2)) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 a a)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale a))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))) (*.f64 x-scale (*.f64 y-scale a)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (/.f64 (*.f64 8 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))) (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2)))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 a a)) (sqrt.f64 8))))))))
(*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (/.f64 (*.f64 1/4 a) (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 1/4 (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (*.f64 (/.f64 (*.f64 1/4 a) (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 y-scale y-scale)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale a)))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))) (*.f64 x-scale (*.f64 y-scale a)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2)) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 y-scale y-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))) (/.f64 (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) y-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) 2)) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 a a)) (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b)) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale a))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (/.f64 (*.f64 8 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))) (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2)))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 a a)) (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 4 (pow.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))) (*.f64 x-scale (*.f64 y-scale a))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) y-scale))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 (*.f64 -1/8 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (/.f64 (sqrt.f64 8) (/.f64 y-scale (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (/.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) y-scale))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (/.f64 y-scale (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (*.f64 x-scale x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (/.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) y-scale))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2)) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (neg.f64 (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) y-scale) (fma.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (/.f64 y-scale (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (*.f64 x-scale x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 -1/2 (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2))))))) y-scale)) (fma.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (/.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) 2))) (*.f64 y-scale (pow.f64 x-scale 5)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (*.f64 (/.f64 (sqrt.f64 8) (pow.f64 x-scale 7)) (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 3) (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) y-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale)))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (sqrt.f64 8)) (/.f64 (*.f64 y-scale (pow.f64 x-scale 7)) (-.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 3) (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2))))) (*.f64 1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) 2))) (*.f64 y-scale (pow.f64 x-scale 5))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 1/8 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 1/8 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) 2))) (*.f64 y-scale (pow.f64 x-scale 5)))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (*.f64 (/.f64 (sqrt.f64 8) (pow.f64 x-scale 7)) (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 3) (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) y-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale)))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) 2))) (*.f64 y-scale (pow.f64 x-scale 5)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (sqrt.f64 8)) (/.f64 (*.f64 y-scale (pow.f64 x-scale 7)) (-.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 3) (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2))))) (*.f64 1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8)))) (*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8)))) (*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) 2)))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))) x-scale)))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (*.f64 y-scale y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) 2)))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (pow.f64 y-scale 4) (/.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2)) (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) 2))) (/.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))) x-scale))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (pow.f64 y-scale 4) (/.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2)) (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (/.f64 (*.f64 -1/2 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2))) (/.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (*.f64 y-scale y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 -1/8 (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale)))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 -1/8 (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 x-scale (pow.f64 y-scale 5)) (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 -1/8 (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (/.f64 (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 x-scale (pow.f64 y-scale 5)) (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale)))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale)))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale)))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 x-scale (pow.f64 y-scale 5)) (sqrt.f64 8)))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale)))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 x-scale (pow.f64 y-scale 5)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (/.f64 (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 -2 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8))))))))
(*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2))))
(/.f64 (*.f64 -1/4 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 y-scale (*.f64 x-scale x-scale)))
(*.f64 -1/4 (/.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale x-scale))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2)))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) y-scale) b)) (/.f64 (*.f64 -1/4 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 y-scale (*.f64 x-scale x-scale))))
(fma.f64 -1/8 (*.f64 (/.f64 (*.f64 angle angle) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 y-scale b))) (*.f64 -1/4 (/.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale x-scale)))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2))))))
(fma.f64 -1/8 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2))))) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 2))) 2))) (*.f64 y-scale b))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) y-scale) b)) (/.f64 (*.f64 -1/4 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 y-scale (*.f64 x-scale x-scale)))))
(fma.f64 -1/8 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 2)))) 2))) (*.f64 y-scale b))) (fma.f64 -1/8 (*.f64 (/.f64 (*.f64 angle angle) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 y-scale b))) (*.f64 -1/4 (/.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale x-scale))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (+.f64 (*.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (*.f64 1/22674816000000 (*.f64 (pow.f64 (PI.f64) 5) (+.f64 a b))))) (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2)))))))
(fma.f64 -1/8 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2))))) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 2))) 2))) (*.f64 y-scale b))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) y-scale) b)) (fma.f64 -1/8 (*.f64 (/.f64 (pow.f64 angle 6) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 2/45 (*.f64 (/.f64 (fma.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (fma.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (*.f64 (*.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 x-scale x-scale))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) 2))) (*.f64 2 (+.f64 (*.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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))))))))) (*.f64 -1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2))))) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (/.f64 (*.f64 1/2 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 4)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2))))) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) b))) 2)))) (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2))))) (*.f64 y-scale b))) (/.f64 (*.f64 -1/4 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 y-scale (*.f64 x-scale x-scale))))))
(fma.f64 -1/8 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 2)))) 2))) (*.f64 y-scale b))) (fma.f64 -1/8 (*.f64 (/.f64 (*.f64 angle angle) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 y-scale b))) (fma.f64 -1/8 (/.f64 (*.f64 (/.f64 (pow.f64 angle 6) (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (+.f64 (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 2/45 (*.f64 (/.f64 (fma.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (fma.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (*.f64 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) 1/22674816000000))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 x-scale x-scale))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2))) (*.f64 2 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (*.f64 x-scale x-scale)) (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))))))))) (/.f64 (*.f64 -1/2 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (*.f64 y-scale y-scale)))))) (*.f64 -1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 1/45 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) 2))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (*.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 2)))) 2))))))))) (*.f64 y-scale b)) (*.f64 -1/4 (/.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale x-scale)))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) 1)
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(neg.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(log.f64 (exp.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(cbrt.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(cbrt.f64 (*.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))))))
(cbrt.f64 (*.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (*.f64 (/.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2))))))
(expm1.f64 (log1p.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(exp.f64 (log.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(log1p.f64 (expm1.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (/.f64 1 (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (/.f64 (/.f64 1 a) (*.f64 (*.f64 b b) (*.f64 a -4))))
(*.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (/.f64 (/.f64 1 a) (*.f64 b (*.f64 b (*.f64 a -4)))))
(*.f64 1 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(*.f64 (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(*.f64 (*.f64 (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) 1)
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(log.f64 (exp.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(cbrt.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))))
(cbrt.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (/.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(expm1.f64 (log1p.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(exp.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(log1p.f64 (expm1.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))

localize616.0ms (0.4%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
57.4%
(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
57.0%
(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
48.8%
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))
35.5%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))))
Compiler

Compiled 1550 to 866 computations (44.1% saved)

series310.0ms (0.2%)

Counts
2 → 120
Calls

30 calls:

TimeVariablePointExpression
38.0ms
a
@0
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))
37.0ms
a
@inf
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))))
23.0ms
b
@0
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))))
17.0ms
angle
@0
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))))
17.0ms
b
@0
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))

rewrite98.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1396×add-sqr-sqrt
1370×*-un-lft-identity
1284×add-exp-log
1284×add-cbrt-cube
1284×add-cube-cbrt
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0611090
114031090
Stop Event
node limit
Counts
2 → 16
Calls
Call 1
Inputs
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))
Outputs
(((pow.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((log.f64 (exp.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((cbrt.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((exp.f64 (log.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)))
(((*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (/.f64 1 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((*.f64 1 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((*.f64 (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((*.f64 (*.f64 (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((pow.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((log.f64 (exp.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((exp.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))) #f)))

simplify1.6s (1.2%)

Algorithm
egg-herbie
Rules
1430×associate-*r/
1226×+-commutative
1174×*-commutative
1026×associate-*l/
728×associate-+r+
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
01332299512
14985299458
Stop Event
node limit
Counts
136 → 322
Calls
Call 1
Inputs
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 y-scale (sqrt.f64 8))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 y-scale 2) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 y-scale 2) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 6) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 y-scale 2) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))) (pow.f64 b 5)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))) (pow.f64 b 5)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (pow.f64 a 4) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (pow.f64 a 4) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (pow.f64 a 6) (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 x-scale (sqrt.f64 8)))) (pow.f64 a 5)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 x-scale (sqrt.f64 8)))) (pow.f64 a 5)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) 2)) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (PI.f64) (+.f64 (*.f64 1/22674816000000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 1/4534963200000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 x-scale y-scale))) (*.f64 1/2267481600000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 x-scale y-scale))))))) (*.f64 x-scale y-scale)))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (sqrt.f64 2) b))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))))))) (*.f64 (sqrt.f64 2) b))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))) (*.f64 (pow.f64 b 6) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))))))
(*.f64 -1 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 b 5)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 b 5)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 6) (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 -1 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 a 5)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 a 5)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (pow.f64 x-scale 2) y-scale)))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (pow.f64 x-scale 2) y-scale))) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (pow.f64 x-scale 2) y-scale))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) 2)) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (PI.f64) (+.f64 (*.f64 1/22674816000000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 1/4534963200000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 x-scale y-scale))) (*.f64 1/2267481600000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 x-scale y-scale))))))) (*.f64 x-scale y-scale)))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (sqrt.f64 2) b))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (pow.f64 x-scale 2) y-scale))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(pow.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) 1)
(log.f64 (exp.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(cbrt.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(expm1.f64 (log1p.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(exp.f64 (log.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(log1p.f64 (expm1.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (/.f64 1 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(*.f64 1 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(*.f64 (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(*.f64 (*.f64 (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) 1)
(log.f64 (exp.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(expm1.f64 (log1p.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(exp.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(log1p.f64 (expm1.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
Outputs
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) 1/2) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (pow.f64 x-scale 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) 2))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) 1/2) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (pow.f64 x-scale 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) 2))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) x-scale) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) x-scale) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2))) (sqrt.f64 8)) (pow.f64 x-scale 3))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) x-scale) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2))) (sqrt.f64 8))) (pow.f64 x-scale 3)))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) x-scale) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2))) (sqrt.f64 8)) (pow.f64 x-scale 3)))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) x-scale) (fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) y-scale) (/.f64 (pow.f64 x-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 -1/4 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))) (/.f64 (*.f64 -1/2 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) 2)))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2))) (sqrt.f64 8))) (pow.f64 x-scale 3))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) x-scale) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) x-scale) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2))) (sqrt.f64 8)) (pow.f64 x-scale 3))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) x-scale) (fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2))) (sqrt.f64 8))) (pow.f64 x-scale 3)) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 y-scale (sqrt.f64 8))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) x-scale) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2))) (sqrt.f64 8)) (pow.f64 x-scale 3))) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))))) (/.f64 (pow.f64 x-scale 5) (*.f64 y-scale (sqrt.f64 8)))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) x-scale) (fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2))) (sqrt.f64 8))) (pow.f64 x-scale 3)) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 -1/4 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))) (/.f64 (*.f64 -1/2 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) 2))))) (/.f64 (pow.f64 x-scale 5) (*.f64 y-scale (sqrt.f64 8)))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 y-scale 2) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))) (*.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (*.f64 (sqrt.f64 8) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))) (*.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 (sqrt.f64 8) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 y-scale 2) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))) (*.f64 1/8 (+.f64 (*.f64 x-scale (*.f64 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (*.f64 (sqrt.f64 8) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (*.f64 (*.f64 x-scale (pow.f64 y-scale 4)) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))) (*.f64 1/8 (+.f64 (*.f64 x-scale (*.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 (sqrt.f64 8) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (*.f64 (*.f64 x-scale (pow.f64 y-scale 4)) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 1/2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 6) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 y-scale 2) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 6) (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) 2)) (/.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))) (*.f64 1/8 (+.f64 (*.f64 x-scale (*.f64 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (*.f64 (sqrt.f64 8) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (*.f64 (*.f64 x-scale (pow.f64 y-scale 4)) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 6) (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) 2)) (/.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))) (*.f64 1/8 (+.f64 (*.f64 x-scale (*.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 (sqrt.f64 8) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (*.f64 (*.f64 x-scale (pow.f64 y-scale 4)) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 1/2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(fma.f64 1/8 (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 1/8 (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (neg.f64 (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2)))) (sqrt.f64 8)) (pow.f64 y-scale 3))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (sqrt.f64 8)) (pow.f64 y-scale 3))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/8 (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (neg.f64 (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2)))) (sqrt.f64 8)) (pow.f64 y-scale 3))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))))))))))))
(fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (sqrt.f64 8)) (pow.f64 y-scale 3))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 -1/4 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))))))))))))
(*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 -1/8 (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (neg.f64 (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2)))) (sqrt.f64 8)) (pow.f64 y-scale 3))) (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 -1/8 (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (sqrt.f64 8)) (pow.f64 y-scale 3))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))))))) (fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (neg.f64 (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2)))) (sqrt.f64 8)) (pow.f64 y-scale 3))) (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 -1/4 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))))))) (fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 -1/8 (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (sqrt.f64 8)) (pow.f64 y-scale 3)))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (*.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b b)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))) 2))) (*.f64 (sqrt.f64 8) (pow.f64 b 4))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))))) (fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (*.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b b)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))) 2))) (*.f64 (sqrt.f64 8) (pow.f64 b 4))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))))) (fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (*.f64 1/8 (+.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b b)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (+.f64 (*.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))) 2)))))) (*.f64 (sqrt.f64 8) (pow.f64 b 6)))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))) 2))) (*.f64 (sqrt.f64 8) (pow.f64 b 4))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))))) (fma.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (*.f64 1/8 (+.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b b)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (+.f64 (*.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))) (/.f64 (*.f64 -1/2 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))) 2))))) (*.f64 (sqrt.f64 8) (pow.f64 b 6)))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(fma.f64 1/4 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(fma.f64 1/4 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 1/4 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 1/8 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)))) (pow.f64 b 3))))))
(fma.f64 1/4 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 1/8 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)))) (pow.f64 b 3))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))) (pow.f64 b 5)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/4 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (fma.f64 1/8 (*.f64 (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)))) (pow.f64 b 3))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 b 5) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (/.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))))))))))
(fma.f64 1/4 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (fma.f64 1/8 (*.f64 (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)))) (pow.f64 b 3))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 x-scale (/.f64 (pow.f64 b 5) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))))))))))
(*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 -1/8 (*.f64 (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)))) (pow.f64 b 3))) (fma.f64 -1/8 (*.f64 (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)))) (pow.f64 b 3))) (fma.f64 -1/8 (*.f64 (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))) (pow.f64 b 5)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)))) (pow.f64 b 3))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 b 5) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (/.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))))) (fma.f64 -1/8 (*.f64 (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)))) (pow.f64 b 3))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 x-scale (/.f64 (pow.f64 b 5) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))))) (fma.f64 -1/8 (*.f64 (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (*.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (*.f64 a a)) (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))
(fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (*.f64 a a)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (pow.f64 a 4) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (pow.f64 a 4)) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 1/2 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))))) (pow.f64 (*.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (*.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (*.f64 a a)) (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (pow.f64 a 4)) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 1/2 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))))) (pow.f64 (*.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (*.f64 a a)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (pow.f64 a 4) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (pow.f64 a 6) (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (pow.f64 a 4)) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 1/2 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))))) (pow.f64 (*.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (*.f64 1/8 (+.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (*.f64 a a)) (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (pow.f64 a 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (/.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))))) 2)))))) (*.f64 -1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (pow.f64 a 4)) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 1/2 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))))) (pow.f64 (*.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 1/8 (+.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (*.f64 a a)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (pow.f64 a 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (/.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) 2)))))) (/.f64 (*.f64 -1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (/.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))
(*.f64 (*.f64 1/4 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(fma.f64 1/8 (*.f64 (/.f64 x-scale (/.f64 a (*.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 (*.f64 1/4 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)))))))
(fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 a (*.f64 (*.f64 y-scale (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8)))) (*.f64 (*.f64 1/4 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 1/8 (*.f64 (/.f64 x-scale (/.f64 a (*.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 x-scale (/.f64 (pow.f64 a 3) (*.f64 (*.f64 y-scale (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))) 2))) (sqrt.f64 8))))))))
(fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 a (*.f64 (*.f64 y-scale (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 (pow.f64 a 3) (*.f64 (*.f64 y-scale (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (sqrt.f64 8)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 x-scale (sqrt.f64 8)))) (pow.f64 a 5)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 a 5) (*.f64 (*.f64 (sqrt.f64 8) x-scale) (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))))))))) (fma.f64 1/8 (*.f64 (/.f64 x-scale (/.f64 a (*.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 x-scale (/.f64 (pow.f64 a 3) (*.f64 (*.f64 y-scale (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))) 2))) (sqrt.f64 8)))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 a 5) (*.f64 (*.f64 (sqrt.f64 8) x-scale) (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))))))))) (fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 a (*.f64 (*.f64 y-scale (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 (pow.f64 a 3) (*.f64 (*.f64 y-scale (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (sqrt.f64 8))))))))
(*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))
(*.f64 (*.f64 -1/4 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))) (*.f64 -1/8 (*.f64 (/.f64 x-scale (/.f64 a (*.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 a (*.f64 (*.f64 y-scale (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 x-scale (/.f64 (pow.f64 a 3) (*.f64 (*.f64 y-scale (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))) 2))) (sqrt.f64 8))))) (*.f64 (/.f64 x-scale (/.f64 a (*.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 -1/8 (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 a (*.f64 (*.f64 y-scale (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 (pow.f64 a 3) (*.f64 (*.f64 y-scale (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (sqrt.f64 8)))))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 x-scale (sqrt.f64 8)))) (pow.f64 a 5)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 a 5) (*.f64 (*.f64 (sqrt.f64 8) x-scale) (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))))))))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 x-scale (/.f64 (pow.f64 a 3) (*.f64 (*.f64 y-scale (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))) 2))) (sqrt.f64 8))))) (*.f64 (/.f64 x-scale (/.f64 a (*.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))))
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 a 5) (*.f64 (*.f64 (sqrt.f64 8) x-scale) (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))))))))) (*.f64 -1/8 (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 a (*.f64 (*.f64 y-scale (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 (pow.f64 a 3) (*.f64 (*.f64 y-scale (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (sqrt.f64 8))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (sqrt.f64 8))) (*.f64 b (sqrt.f64 2))) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))))) (sqrt.f64 8))) (*.f64 b (sqrt.f64 2))) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (sqrt.f64 8))) (*.f64 b (sqrt.f64 2))) (fma.f64 1/8 (/.f64 y-scale (/.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 angle 4)) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))))) 2)))))) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))))) (sqrt.f64 8))) (*.f64 b (sqrt.f64 2))) (fma.f64 1/8 (/.f64 y-scale (/.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 angle 4)) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (+.f64 (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))))))) 2)))))) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) 2)) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (PI.f64) (+.f64 (*.f64 1/22674816000000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 1/4534963200000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 x-scale y-scale))) (*.f64 1/2267481600000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 x-scale y-scale))))))) (*.f64 x-scale y-scale)))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (sqrt.f64 2) b))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))))))) (*.f64 (sqrt.f64 2) b))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (sqrt.f64 8))) (*.f64 b (sqrt.f64 2))) (fma.f64 1/8 (/.f64 y-scale (/.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 angle 4)) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))))) 2)))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (*.f64 (pow.f64 angle 6) (sqrt.f64 8)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (*.f64 1/2 (/.f64 (+.f64 (fma.f64 2 (*.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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))))) (fma.f64 4 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) 2) (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (fma.f64 1/22674816000000 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) 1/1511654400000))))))))) (*.f64 -1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 2/45 (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 1/2 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 2/45 (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))))) 2)))) (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2))))))) (*.f64 b (sqrt.f64 2)))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))))) (sqrt.f64 8))) (*.f64 b (sqrt.f64 2))) (fma.f64 1/8 (/.f64 y-scale (/.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 angle 4)) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (+.f64 (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))))))) 2)))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (*.f64 (pow.f64 angle 6) (sqrt.f64 8)) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))) (+.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (fma.f64 2 (*.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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))))) (fma.f64 4 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) 2) (/.f64 (*.f64 2/45 (/.f64 (*.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 1/22674816000000 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 1/1511654400000) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 5))))) x-scale)) y-scale)))) (/.f64 (*.f64 -1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 2/45 (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))) (/.f64 (*.f64 -1/2 (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))))) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 2/45 (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))))))) 2))))))))) 1/8) (*.f64 b (sqrt.f64 2))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) 4) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) 4) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) 4) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) 4) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (*.f64 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) y-scale) (/.f64 (*.f64 (sqrt.f64 8) (*.f64 b b)) x-scale))) (neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (*.f64 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) y-scale) (/.f64 (*.f64 (sqrt.f64 8) (*.f64 b b)) x-scale))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (pow.f64 b 4))))) (neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))) (*.f64 (pow.f64 b 6) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))) 2)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (*.f64 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) y-scale) (/.f64 (*.f64 (sqrt.f64 8) (*.f64 b b)) x-scale))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (/.f64 (+.f64 (*.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))) 2)))))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (pow.f64 b 6))))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (pow.f64 b 4))))) (neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (*.f64 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) y-scale) (/.f64 (*.f64 (sqrt.f64 8) (*.f64 b b)) x-scale))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (/.f64 (+.f64 (*.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))) (/.f64 (*.f64 -1/2 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))) 2))))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (pow.f64 b 6))))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (pow.f64 b 4))))) (neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))))
(*.f64 -1 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (*.f64 y-scale (*.f64 b x-scale)) (sqrt.f64 8))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (*.f64 y-scale (*.f64 b x-scale)) (sqrt.f64 8))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 b 3))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (*.f64 y-scale (*.f64 b x-scale)) (sqrt.f64 8)))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)) (*.f64 -1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (*.f64 y-scale (*.f64 b x-scale)) (sqrt.f64 8)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (pow.f64 b 3)) (sqrt.f64 8))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 b 5)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (/.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 b 5))))) (*.f64 -1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 b 3))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (*.f64 y-scale (*.f64 b x-scale)) (sqrt.f64 8))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 b 5))))) (*.f64 -1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (*.f64 y-scale (*.f64 b x-scale)) (sqrt.f64 8)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (pow.f64 b 3)) (sqrt.f64 8)))))))
(*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale)))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale))
(+.f64 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(fma.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (*.f64 y-scale (*.f64 b x-scale)) (sqrt.f64 8))))))
(fma.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (*.f64 y-scale (*.f64 b x-scale)) (sqrt.f64 8))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 b 3))))) (fma.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (*.f64 y-scale (*.f64 b x-scale)) (sqrt.f64 8)))))))
(fma.f64 1/2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (pow.f64 b 3)) (sqrt.f64 8))) (fma.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (*.f64 y-scale (*.f64 b x-scale)) (sqrt.f64 8)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 b 3)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 b 5)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 b 3))))) (fma.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale)) (*.f64 1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (/.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 b 5))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (*.f64 y-scale (*.f64 b x-scale)) (sqrt.f64 8))))))))
(fma.f64 1/2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (pow.f64 b 3)) (sqrt.f64 8))) (fma.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale) (*.f64 1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (*.f64 y-scale (*.f64 b x-scale)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4))))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 b 5)))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))))))) x-scale))) (neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))) x-scale))) (neg.f64 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))))))) x-scale))) (fma.f64 -1 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 1/2 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))))) (pow.f64 (*.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 y-scale x-scale)))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))) x-scale))) (fma.f64 -1 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 1/2 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))))) (pow.f64 (*.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 y-scale x-scale)))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 6) (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (pow.f64 a 6) y-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (/.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))))) 2)))))) (*.f64 -1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))))))) (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2))))))) x-scale))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))))))) x-scale))) (fma.f64 -1 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 1/2 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))))) (pow.f64 (*.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 y-scale x-scale))))))
(fma.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (pow.f64 a 6)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (/.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) 2)))))) (/.f64 (*.f64 -1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (/.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) 2)))))))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))) x-scale))) (fma.f64 -1 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 1/2 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))))) (pow.f64 (*.f64 (*.f64 1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 (*.f64 1/2 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -4 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 y-scale x-scale))))))
(*.f64 -1 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale))))
(*.f64 (/.f64 (neg.f64 a) (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 a x-scale)))) (neg.f64 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale)))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 a x-scale)))) (*.f64 (/.f64 (neg.f64 a) (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 -1 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 a x-scale)))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))) 2)) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 a 3))))) (neg.f64 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 a x-scale)))) (fma.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (/.f64 (*.f64 y-scale (*.f64 x-scale (pow.f64 a 3))) (sqrt.f64 8))) (*.f64 (/.f64 (neg.f64 a) (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 a 5)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 a x-scale)))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))) 2)) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 a 3))))) (fma.f64 -1 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 a 5)))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 a x-scale)))) (fma.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (/.f64 (*.f64 y-scale (*.f64 x-scale (pow.f64 a 3))) (sqrt.f64 8))) (fma.f64 -1 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (pow.f64 a 5)) (sqrt.f64 8)))))))
(*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))
(*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale)))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale)))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 a x-scale)))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 a x-scale)))) (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 a x-scale)))) (fma.f64 (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))) 2)) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 a 3))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 a x-scale)))) (fma.f64 (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (/.f64 (*.f64 y-scale (*.f64 x-scale (pow.f64 a 3))) (sqrt.f64 8))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 a 3)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (-.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 -8 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale (pow.f64 a 5)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 a x-scale)))) (fma.f64 (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))) (*.f64 1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale))))))) 2)) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 a 3))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 x-scale (pow.f64 a 5)))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) y-scale) (/.f64 (sqrt.f64 8) (*.f64 a x-scale)))) (fma.f64 (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 1/2 (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (-.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (-.f64 (*.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2))) (/.f64 (*.f64 y-scale (*.f64 x-scale (pow.f64 a 3))) (sqrt.f64 8))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 -1/4 (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (pow.f64 (*.f64 (*.f64 1/2 (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (pow.f64 a 5)) (sqrt.f64 8)))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(neg.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))))
(fma.f64 -1 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 (*.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 y-scale (sqrt.f64 8)))))
(fma.f64 -1 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 -1/2 (/.f64 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 y-scale (sqrt.f64 8)))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 -1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 y-scale (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (*.f64 x-scale x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 -1/2 (+.f64 (/.f64 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 y-scale (sqrt.f64 8))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (*.f64 x-scale x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) 1/2) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)))))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 y-scale (sqrt.f64 8)))) (*.f64 -1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (pow.f64 x-scale 4) (/.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) 2)))))))))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (*.f64 x-scale x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (fma.f64 -1/2 (/.f64 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 y-scale (sqrt.f64 8))) (*.f64 -1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (*.f64 x-scale x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) 1/2) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)))))) (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 x-scale 4)) (/.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) 2)))))))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (*.f64 (*.f64 -1/2 (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (*.f64 -1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (*.f64 -1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2)) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 5)) (sqrt.f64 8))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 -1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))))) (pow.f64 x-scale 7)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale)))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 -1/2 (+.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2)) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 5)) (sqrt.f64 8))) (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (*.f64 -1/4 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))) (/.f64 (*.f64 -1/2 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) 2)))))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 7)) (sqrt.f64 8)))))))
(*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))
(*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (fma.f64 (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (fma.f64 (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2)) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 5)) (sqrt.f64 8))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))))) (pow.f64 x-scale 7)) (/.f64 (sqrt.f64 8) y-scale))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (fma.f64 (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale)))))))
(fma.f64 1/2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (*.f64 -1/4 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))) (/.f64 (*.f64 -1/2 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))) 2)))))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 7)) (sqrt.f64 8))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (fma.f64 (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) 2)) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 5)) (sqrt.f64 8)))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (/.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale y-scale)) x-scale)))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (/.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale y-scale)) x-scale)) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 x-scale (sqrt.f64 8))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (/.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale y-scale)) x-scale)) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 (+.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))) x-scale) (fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (/.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale y-scale)) x-scale)) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 x-scale (sqrt.f64 8)))))))
(fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 1/2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))) x-scale) (fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (/.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale y-scale)) x-scale)) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 (+.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8)))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (*.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 4) (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) 2)) (/.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))) x-scale) (fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))) x-scale) (fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (/.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale y-scale)) x-scale)) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 x-scale (sqrt.f64 8))))))))
(fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 4) (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))))) (*.f64 -1/2 (/.f64 (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) 2)) (/.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))) x-scale) (fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 1/2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))) x-scale) (fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (/.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale y-scale)) x-scale)) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))) (/.f64 (+.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8))))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (*.f64 (/.f64 (*.f64 -1/2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (*.f64 -1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (neg.f64 (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (*.f64 -1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2)) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 5)) (sqrt.f64 8))))))
(+.f64 (*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (*.f64 -1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (neg.f64 (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (*.f64 -1/2 (+.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2)) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 5)) (sqrt.f64 8))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (+.f64 (/.f64 (*.f64 -1/4 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8))))))))
(*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))
(*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (neg.f64 (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (fma.f64 1/2 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2)) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 5)) (sqrt.f64 8))) (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (neg.f64 (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2))) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (fma.f64 1/2 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) 1/2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2)) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 5)) (sqrt.f64 8))) (fma.f64 (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (+.f64 (/.f64 (*.f64 -1/4 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))) (*.f64 (*.f64 -2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8))))))))
(*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (pow.f64 x-scale 2) y-scale)))
(neg.f64 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (pow.f64 x-scale 2) y-scale))) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))))
(fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))) (/.f64 (*.f64 -1/2 (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b))))
(fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))) (/.f64 (*.f64 -1/2 (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (pow.f64 x-scale 2) y-scale))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b))))))
(fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))) (*.f64 -1/2 (+.f64 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))))) 2))) (*.f64 y-scale b))) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 y-scale b))))))
(fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))) (*.f64 -1/2 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))))) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 y-scale b))) (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (+.f64 (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))))))) 2))) (*.f64 y-scale b))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 angle 6) (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) 2)) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (PI.f64) (+.f64 (*.f64 1/22674816000000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 1/4534963200000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 x-scale y-scale))) (*.f64 1/2267481600000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (*.f64 x-scale y-scale))))))) (*.f64 x-scale y-scale)))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale))) (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 y-scale x-scale)))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (*.f64 y-scale x-scale))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 (sqrt.f64 2) b))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (pow.f64 x-scale 2) y-scale))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (*.f64 2/45 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (*.f64 (+.f64 (*.f64 -1/34992000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale))) (*.f64 -1/11664000 (/.f64 (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (*.f64 x-scale y-scale)))) (PI.f64))) (*.f64 x-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/2 (/.f64 (*.f64 (pow.f64 angle 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))))))
(fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (pow.f64 angle 6) (sqrt.f64 8)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (*.f64 1/2 (/.f64 (+.f64 (fma.f64 2 (*.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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))))) (fma.f64 4 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) 2) (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (fma.f64 1/22674816000000 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) 1/1511654400000))))))))) (*.f64 -1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 2/45 (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 1/2 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 2/45 (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))))) 2)))) (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b))) (fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))) (*.f64 -1/2 (+.f64 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))))) 2))) (*.f64 y-scale b))) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))))))
(fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (pow.f64 angle 6) (sqrt.f64 8)) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))) (+.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (fma.f64 2 (*.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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))))) (fma.f64 4 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) 2) (/.f64 (*.f64 2/45 (/.f64 (*.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 1/22674816000000 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 1/1511654400000) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 5))))) x-scale)) y-scale)))) (/.f64 (*.f64 -1/2 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 2/45 (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))) (/.f64 (*.f64 -1/2 (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))))) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (fma.f64 2/45 (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))))))) 2)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b))) (fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))) (*.f64 -1/2 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))))) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 y-scale b))) (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (+.f64 (*.f64 2/45 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (PI.f64) (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/8748000))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 b (sqrt.f64 2)) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 1/32400 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))) (*.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 1/8100 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/32400 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))))))) 2))) (*.f64 y-scale b)))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) 4) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) 4) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) 4) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) 4) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(neg.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))
(pow.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) 1)
(*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))))
(*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))))
(log.f64 (exp.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))))
(*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))))
(cbrt.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(cbrt.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))) (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))) (*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))))))
(cbrt.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))) (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))) (*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))))))
(expm1.f64 (log1p.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))))
(*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))))
(exp.f64 (log.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))))
(*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))))
(log1p.f64 (expm1.f64 (*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))))
(*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))))
(*.f64 (*.f64 (pow.f64 (*.f64 y-scale x-scale) 2) -1/4) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))))
(*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (/.f64 1 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (/.f64 (/.f64 1 b) (*.f64 (*.f64 a b) (neg.f64 a))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))
(*.f64 1 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (/.f64 (/.f64 1 b) (*.f64 (*.f64 a b) (neg.f64 a))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))
(*.f64 (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (/.f64 (/.f64 1 b) (*.f64 (*.f64 a b) (neg.f64 a))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))
(*.f64 (*.f64 (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (/.f64 (/.f64 1 b) (*.f64 (*.f64 a b) (neg.f64 a))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) 1)
(*.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (/.f64 (/.f64 1 b) (*.f64 (*.f64 a b) (neg.f64 a))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))
(log.f64 (exp.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (/.f64 (/.f64 1 b) (*.f64 (*.f64 a b) (neg.f64 a))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))
(cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(cbrt.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))) (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))))))
(cbrt.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))) (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a)))))))
(expm1.f64 (log1p.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (/.f64 (/.f64 1 b) (*.f64 (*.f64 a b) (neg.f64 a))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))
(exp.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (/.f64 (/.f64 1 b) (*.f64 (*.f64 a b) (neg.f64 a))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))
(log1p.f64 (expm1.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 8 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a))))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 2 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale))))))) (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 a b) (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (/.f64 (/.f64 1 b) (*.f64 (*.f64 a b) (neg.f64 a))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (/.f64 (*.f64 (*.f64 b (neg.f64 a)) 8) (/.f64 (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) b) (*.f64 (*.f64 a b) (neg.f64 a)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) 2)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 2 x-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) y-scale))))))) (*.f64 b (*.f64 (*.f64 a b) (neg.f64 a))))

eval40.3s (29.1%)

Compiler

Compiled 934295 to 570014 computations (39% saved)

prune990.0ms (0.7%)

Pruning

58 alts after pruning (58 fresh and 0 done)

PrunedKeptTotal
New1607581665
Fresh000
Picked101
Done202
Total1610581668
Accurracy
41.5%
Counts
1668 → 58
Alt Table
Click to see full alt table
StatusAccuracyProgram
5.9%
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) b)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (*.f64 1/8 (*.f64 (/.f64 y-scale (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))))))
3.1%
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (sqrt.f64 8)) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
3.0%
(fma.f64 1/8 (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
2.1%
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (*.f64 (*.f64 y-scale (pow.f64 x-scale 4)) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (pow.f64 x-scale 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) 2))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))))
2.1%
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) 1/2) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (pow.f64 x-scale 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) 2))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))
1.6%
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) x-scale) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))
2.2%
(fma.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (sqrt.f64 8)) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
2.2%
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 a (*.f64 (*.f64 y-scale (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8))))))
1.8%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale)))))
2.6%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale))))
2.2%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))
2.2%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))
5.1%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))))))
3.4%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (neg.f64 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))))
5.1%
(*.f64 (/.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 y-scale (*.f64 x-scale x-scale))) (pow.f64 (*.f64 x-scale y-scale) 2))
1.2%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (*.f64 (*.f64 (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
1.2%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) 1) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
1.2%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
1.0%
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b 1) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2))
3.7%
(*.f64 (*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (pow.f64 (*.f64 x-scale y-scale) 2))
3.0%
(*.f64 (*.f64 (*.f64 1/4 (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
4.1%
(*.f64 (*.f64 (*.f64 -1/4 (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
6.5%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
4.8%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
6.1%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
2.0%
(*.f64 (*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (*.f64 x-scale y-scale) 2))
1.3%
(*.f64 (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale)))) (pow.f64 (*.f64 x-scale y-scale) 2))
3.7%
(*.f64 (*.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 x-scale y-scale) 2))
15.9%
(*.f64 (*.f64 1/4 (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))
2.4%
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))
4.9%
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
6.1%
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
6.7%
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))
11.8%
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))
11.8%
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
2.5%
(*.f64 (*.f64 1/4 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
18.6%
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
4.1%
(*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
4.3%
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
4.2%
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
3.4%
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
3.1%
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))))
0.9%
(*.f64 (exp.f64 (log.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (pow.f64 (*.f64 x-scale y-scale) 2))
4.8%
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
11.8%
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))
6.6%
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
6.0%
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
18.6%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
3.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
5.1%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))))
6.2%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
15.8%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))))
3.4%
(*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
4.2%
(*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))))
4.2%
(*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))))
3.7%
(*.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
1.1%
(expm1.f64 (log1p.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
0.6%
(cbrt.f64 (*.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))))))
Compiler

Compiled 19024 to 12184 computations (36% saved)

localize17.0ms (0%)

Local Accuracy

Found 3 expressions with local accuracy:

NewAccuracyProgram
100.0%
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
99.3%
(*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))
99.3%
(*.f64 (sqrt.f64 8) b)
Compiler

Compiled 39 to 32 computations (17.9% saved)

series9.0ms (0%)

Counts
3 → 48
Calls

12 calls:

TimeVariablePointExpression
1.0ms
y-scale
@0
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
1.0ms
b
@inf
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
1.0ms
b
@0
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
1.0ms
y-scale
@inf
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
1.0ms
b
@inf
(*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))

rewrite86.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1190×sqrt-prod
1016×unswap-sqr
864×swap-sqr
460×sqr-pow
428×pow-sqr
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01465
128165
2313765
Stop Event
node limit
Counts
3 → 54
Calls
Call 1
Inputs
(*.f64 (sqrt.f64 8) b)
(*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
Outputs
(((+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b)))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b)))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((pow.f64 (*.f64 (sqrt.f64 8) b) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) b)) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) b)) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((sqrt.f64 (*.f64 8 (*.f64 b b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((fabs.f64 (*.f64 (sqrt.f64 8) b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 b 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 b 3) (*.f64 8 (sqrt.f64 8)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((exp.f64 (log.f64 (*.f64 (sqrt.f64 8) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 8) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)))
(((+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((sqrt.f64 (*.f64 8 (*.f64 2 (*.f64 b b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) (*.f64 b (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3) (*.f64 2 (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((cbrt.f64 (*.f64 (*.f64 2 (sqrt.f64 2)) (pow.f64 (*.f64 (sqrt.f64 8) b) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)))
(((+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) y-scale))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (*.f64 (*.f64 1/4 y-scale) b) (sqrt.f64 8)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((log.f64 (pow.f64 (exp.f64 1/4) (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) y-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) (pow.f64 (*.f64 1/4 y-scale) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 1/4 y-scale) 3) (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))) #f)))

simplify66.0ms (0%)

Algorithm
egg-herbie
Rules
1598×unswap-sqr
1312×distribute-rgt-in
1312×distribute-lft-in
596×times-frac
532×associate-/l*
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
01552732
14202658
216892654
Stop Event
node limit
Counts
102 → 78
Calls
Call 1
Inputs
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) 1)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b)))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b)))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) 1))))
(pow.f64 (*.f64 (sqrt.f64 8) b) 1)
(pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) b)) 2)
(pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) b)) 3)
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3) 1/3)
(sqrt.f64 (*.f64 8 (*.f64 b b)))
(fabs.f64 (*.f64 (sqrt.f64 8) b))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) b))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) b))))
(cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3))
(cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 b 3)))
(cbrt.f64 (*.f64 (pow.f64 b 3) (*.f64 8 (sqrt.f64 8))))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b)))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 8) b)))
(log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 8) b)))
(+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1))))
(pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 1)
(pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 2)
(pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 3)
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3)
(sqrt.f64 (*.f64 8 (*.f64 2 (*.f64 b b))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) (*.f64 b (sqrt.f64 2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))))
(cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3) (*.f64 2 (sqrt.f64 2))))
(cbrt.f64 (*.f64 (*.f64 2 (sqrt.f64 2)) (pow.f64 (*.f64 (sqrt.f64 8) b) 3)))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))
(log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) 1)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) 1))))
(pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 1)
(pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) y-scale))) 2)
(pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) 3)
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3) 1/3)
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (*.f64 (*.f64 1/4 y-scale) b) (sqrt.f64 8)) 2)))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
(log.f64 (pow.f64 (exp.f64 1/4) (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) y-scale)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))))
(cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) (pow.f64 (*.f64 1/4 y-scale) 3)))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 1/4 y-scale) 3) (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3)))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
Outputs
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 b (sqrt.f64 8))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) -1)
(*.f64 b (sqrt.f64 8))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) 1)
(*.f64 b (sqrt.f64 8))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b)))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) 1))
(*.f64 b (sqrt.f64 8))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b)))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) 3) -1) (fma.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) 1)))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 b (sqrt.f64 8))))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) 3)) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) 1))))
(pow.f64 (*.f64 (sqrt.f64 8) b) 1)
(*.f64 b (sqrt.f64 8))
(pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) b)) 2)
(*.f64 b (sqrt.f64 8))
(pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) b)) 3)
(*.f64 b (sqrt.f64 8))
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3) 1/3)
(*.f64 b (sqrt.f64 8))
(sqrt.f64 (*.f64 8 (*.f64 b b)))
(sqrt.f64 (*.f64 b (*.f64 b 8)))
(fabs.f64 (*.f64 (sqrt.f64 8) b))
(*.f64 b (sqrt.f64 8))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) b))
(*.f64 b (sqrt.f64 8))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) b))))
(*.f64 b (sqrt.f64 8))
(cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3))
(*.f64 b (sqrt.f64 8))
(cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 b 3)))
(*.f64 b (sqrt.f64 8))
(cbrt.f64 (*.f64 (pow.f64 b 3) (*.f64 8 (sqrt.f64 8))))
(*.f64 b (sqrt.f64 8))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b)))
(*.f64 b (sqrt.f64 8))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 8) b)))
(*.f64 b (sqrt.f64 8))
(log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 8) b)))
(*.f64 b (sqrt.f64 8))
(+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) -1)
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1)
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 3) -1) (+.f64 (exp.f64 (+.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))) (+.f64 1 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 3)) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 3)) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))))
(pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 1)
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 2)
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 3)
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3)
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(sqrt.f64 (*.f64 8 (*.f64 2 (*.f64 b b))))
(sqrt.f64 (*.f64 16 (*.f64 b b)))
(sqrt.f64 (*.f64 (*.f64 b b) 16))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) (*.f64 b (sqrt.f64 2))))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3) (*.f64 2 (sqrt.f64 2))))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(cbrt.f64 (*.f64 (*.f64 2 (sqrt.f64 2)) (pow.f64 (*.f64 (sqrt.f64 8) b) 3)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) -1)
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) 1)
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) 1))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))) 3) -1) (+.f64 (exp.f64 (+.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))) (+.f64 1 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale))))) 3)) (+.f64 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))))) (+.f64 1 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale))))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8))))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8))))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8))))))))
(pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 1)
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) y-scale))) 2)
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) 3)
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3) 1/3)
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (*.f64 (*.f64 1/4 y-scale) b) (sqrt.f64 8)) 2)))
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 1/4 (*.f64 y-scale b))) 2)))
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)) 2)))
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(log.f64 (pow.f64 (exp.f64 1/4) (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) y-scale)))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) (pow.f64 (*.f64 1/4 y-scale) 3)))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 1/4 y-scale) 3) (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3)))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))

localize19.0ms (0%)

Local Accuracy

Found 3 expressions with local accuracy:

NewAccuracyProgram
99.7%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
99.3%
(*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))
99.3%
(*.f64 (sqrt.f64 8) b)
Compiler

Compiled 45 to 37 computations (17.8% saved)

series5.0ms (0%)

Counts
1 → 24
Calls

6 calls:

TimeVariablePointExpression
1.0ms
b
@inf
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
1.0ms
y-scale
@0
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
1.0ms
b
@0
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
0.0ms
b
@-inf
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
0.0ms
y-scale
@inf
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))

rewrite70.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1192×sqrt-prod
994×unswap-sqr
872×swap-sqr
460×sqr-pow
428×pow-sqr
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01433
128133
2313433
Stop Event
node limit
Counts
1 → 16
Calls
Call 1
Inputs
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
Outputs
(((+.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((pow.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((pow.f64 (pow.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((sqrt.f64 (*.f64 1/16 (*.f64 2 (pow.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) b)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((log.f64 (pow.f64 (exp.f64 1/4) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((exp.f64 (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))) #f)))

simplify50.0ms (0%)

Algorithm
egg-herbie
Rules
1424×associate-/l*
1234×associate-+r+
1192×associate-+l+
1184×distribute-lft-in
1162×associate-/r*
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
0631480
11651444
26291438
324981438
Stop Event
node limit
Counts
40 → 26
Calls
Call 1
Inputs
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) 1)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) 1))))
(pow.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))) 1)
(pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 2)
(pow.f64 (cbrt.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 3)
(pow.f64 (pow.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))) 3) 1/3)
(sqrt.f64 (*.f64 1/16 (*.f64 2 (pow.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) b)) 2))))
(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
(log.f64 (pow.f64 (exp.f64 1/4) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))))
(cbrt.f64 (pow.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))) 3))
(expm1.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))))
(exp.f64 (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))))
(log1p.f64 (expm1.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))))
Outputs
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) -1)
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) 1)
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) 1))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) -1) (fma.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 1)))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b)))))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b)))))))))
(/.f64 (expm1.f64 (*.f64 (log1p.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))
(pow.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))) 1)
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 2)
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(pow.f64 (cbrt.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 3)
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(pow.f64 (pow.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))) 3) 1/3)
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(sqrt.f64 (*.f64 1/16 (*.f64 2 (pow.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) b)) 2))))
(sqrt.f64 (*.f64 1/8 (pow.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 8))) 2)))
(sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 8))) 2) 1/8))
(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(log.f64 (pow.f64 (exp.f64 1/4) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(cbrt.f64 (pow.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))) 3))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(expm1.f64 (log1p.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(exp.f64 (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(log1p.f64 (expm1.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))

localize88.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
93.4%
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))
66.2%
(sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
57.4%
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
57.3%
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
Compiler

Compiled 243 to 138 computations (43.2% saved)

series54.0ms (0%)

Counts
4 → 80
Calls

24 calls:

TimeVariablePointExpression
41.0ms
b
@-inf
(sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
2.0ms
angle
@0
(sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
1.0ms
b
@0
(sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
1.0ms
b
@inf
(sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
1.0ms
b
@0
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))

rewrite216.0ms (0.2%)

Algorithm
batch-egg-rewrite
Rules
642×distribute-rgt-in
558×distribute-lft-in
456×add-sqr-sqrt
446×*-un-lft-identity
442×pow1
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
023198
1460182
25365182
Stop Event
node limit
Counts
4 → 100
Calls
Call 1
Inputs
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))
Outputs
(((-.f64 (exp.f64 (log1p.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 1 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (sqrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (sqrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((sqrt.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((fabs.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((log.f64 (exp.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((cbrt.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((expm1.f64 (log1p.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((exp.f64 (log.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((log1p.f64 (expm1.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 1 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (sqrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (sqrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((sqrt.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((fabs.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((log.f64 (exp.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((cbrt.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((exp.f64 (log.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 1 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) (sqrt.f64 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/4) (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (sqrt.f64 (cbrt.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2) 4))) (sqrt.f64 (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (pow.f64 1 1/2) (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2) 4)) 1/2) (pow.f64 (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/4) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 3/2) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((fabs.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((log.f64 (exp.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 3/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((expm1.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((exp.f64 (log.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((exp.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((log1p.f64 (expm1.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)))
(((+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((+.f64 (*.f64 1 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((+.f64 (*.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1) 1) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((-.f64 (exp.f64 (log1p.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((-.f64 (exp.f64 (log1p.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))) (-.f64 1 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((-.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (exp.f64 (log1p.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((-.f64 (+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1) (exp.f64 (log1p.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 1 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (cbrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) (cbrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((*.f64 (cbrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2)) (cbrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 4))) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) 3) (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 3)) (+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((/.f64 (*.f64 1 (-.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 4)))) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((/.f64 (*.f64 1 (+.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) 3) (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 3))) (+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 4))) 1) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((/.f64 (*.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) 3) (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 3)) 1) (+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (cbrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((pow.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((sqrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((log.f64 (exp.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((cbrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((expm1.f64 (log1p.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((exp.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)) ((log1p.f64 (expm1.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a)))) #f)))

simplify151.0ms (0.1%)

Algorithm
egg-herbie
Rules
1266×associate-*r/
976×associate-*l/
942×associate-*r*
664×associate-*l*
658×+-commutative
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
040115346
1105413826
2517313826
Stop Event
node limit
Counts
180 → 245
Calls
Call 1
Inputs
(*.f64 1/180 (*.f64 angle (PI.f64)))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (*.f64 1/180 (*.f64 angle (PI.f64))))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (*.f64 1/180 (*.f64 angle (PI.f64))) (*.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (*.f64 1/180 (*.f64 angle (PI.f64))) (+.f64 (*.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (*.f64 -1/30855889612800000000 (*.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
1
(+.f64 1 (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 (*.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 a 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 a 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 (pow.f64 a 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))))))
(*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 (pow.f64 b 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 (pow.f64 b 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(*.f64 (sqrt.f64 2) a)
(+.f64 (*.f64 (sqrt.f64 2) a) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))))) a)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (*.f64 -1/3149280000 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) a)) 2)))) a)) (+.f64 (*.f64 (sqrt.f64 2) a) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))))) a))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (*.f64 -1/3149280000 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) a)) 2)))) a)) (+.f64 (*.f64 (sqrt.f64 2) a) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))))) a)) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 6) (-.f64 (+.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (-.f64 (+.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (*.f64 -1/3149280000 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) a)) 2))) (pow.f64 a 2)))))) a)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 (pow.f64 b 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 a 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 a 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 (pow.f64 a 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))))))
(*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 a 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 (pow.f64 a 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 a 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(pow.f64 a 2)
(+.f64 (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 a 2))
(+.f64 (*.f64 (pow.f64 angle 4) (+.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (*.f64 -1/3149280000 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4))))) (+.f64 (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 a 2)))
(+.f64 (*.f64 (pow.f64 angle 4) (+.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (*.f64 -1/3149280000 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4))))) (+.f64 (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 angle 6) (+.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))))))))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) 1)
(*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(*.f64 1 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))
(*.f64 (sqrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(*.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(*.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))
(pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(pow.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) 1/2)
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)
(pow.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 3)
(pow.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) 1/3)
(sqrt.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(fabs.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))
(log.f64 (exp.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(cbrt.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))
(expm1.f64 (log1p.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(exp.f64 (log.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 1))
(log1p.f64 (expm1.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) 1)
(*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(*.f64 1 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))
(pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(pow.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) 1/2)
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 3)
(pow.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) 1/3)
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(fabs.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))
(log.f64 (exp.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(exp.f64 (log.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 1))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(-.f64 (exp.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))) 1)
(*.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1)
(*.f64 1 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) (sqrt.f64 2))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(*.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/4) (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/4))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(*.f64 (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(*.f64 (sqrt.f64 (cbrt.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2) 4))) (sqrt.f64 (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(*.f64 (pow.f64 1 1/2) (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2) 4)) 1/2) (pow.f64 (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1/2))
(pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/2)
(pow.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1)
(pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/4) 2)
(pow.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) 3)
(pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 3/2) 1/3)
(fabs.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(log.f64 (exp.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(log.f64 (+.f64 1 (expm1.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))))
(cbrt.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 3/2))
(expm1.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(exp.f64 (log.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(exp.f64 (*.f64 (log.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1/2))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) 1))
(log1p.f64 (expm1.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))
(+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1))
(+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))
(+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))
(+.f64 (*.f64 1 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))
(+.f64 (*.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1) 1) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))
(-.f64 (exp.f64 (log1p.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1)
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))) (-.f64 1 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))
(-.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (exp.f64 (log1p.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)))) 1)
(-.f64 (+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1) (exp.f64 (log1p.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)))) 1)
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 1)
(*.f64 1 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(*.f64 (cbrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) (cbrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2)))
(*.f64 (cbrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2)) (cbrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 4))) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) 3) (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 3)) (+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(/.f64 (*.f64 1 (-.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 4)))) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)))
(/.f64 (*.f64 1 (+.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) 3) (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 3))) (+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 4))) 1) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) 3) (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 3)) 1) (+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 1)
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 2)
(pow.f64 (cbrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 3)
(pow.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 3) 1/3)
(sqrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2))
(log.f64 (exp.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(log.f64 (+.f64 1 (expm1.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(cbrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 3))
(expm1.f64 (log1p.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(exp.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1))
(log1p.f64 (expm1.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
Outputs
(*.f64 1/180 (*.f64 angle (PI.f64)))
(*.f64 (*.f64 1/180 angle) (PI.f64))
(*.f64 (*.f64 1/180 (PI.f64)) angle)
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (*.f64 1/180 (*.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 1/180 angle) (PI.f64)))
(fma.f64 1/180 (*.f64 angle (PI.f64)) (*.f64 (pow.f64 (PI.f64) 3) (*.f64 -1/34992000 (pow.f64 angle 3))))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (*.f64 1/180 (*.f64 angle (PI.f64))) (*.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (*.f64 angle (PI.f64)) (*.f64 (*.f64 1/22674816000000 (pow.f64 angle 5)) (pow.f64 (PI.f64) 5))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (*.f64 angle (PI.f64)) (*.f64 (pow.f64 (PI.f64) 5) (*.f64 1/22674816000000 (pow.f64 angle 5)))))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (*.f64 1/180 (*.f64 angle (PI.f64))) (+.f64 (*.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (*.f64 -1/30855889612800000000 (*.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (*.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)) (*.f64 (*.f64 -1/30855889612800000000 (pow.f64 angle 7)) (pow.f64 (PI.f64) 7)))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (*.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)) (*.f64 (pow.f64 (PI.f64) 7) (*.f64 -1/30855889612800000000 (pow.f64 angle 7))))))
1
(+.f64 1 (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (*.f64 -1/64800 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2))))
(fma.f64 -1/64800 (*.f64 angle (*.f64 angle (pow.f64 (PI.f64) 2))) 1)
(+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 1 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 -1/64800 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2)))))
(+.f64 1 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 (pow.f64 (PI.f64) 2) (*.f64 -1/64800 (*.f64 angle angle)))))
(+.f64 (*.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(fma.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6)) (+.f64 1 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 -1/64800 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2))))))
(+.f64 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 (pow.f64 (PI.f64) 2) (*.f64 -1/64800 (*.f64 angle angle)))) (fma.f64 (*.f64 -1/24488801280000000 (pow.f64 angle 6)) (pow.f64 (PI.f64) 6) 1))
(*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))
(*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (/.f64 (*.f64 1/2 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(fma.f64 1/2 (/.f64 (*.f64 (/.f64 (sqrt.f64 2) a) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) a) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 a 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))) (fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (/.f64 (*.f64 1/2 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 1/2 (/.f64 (*.f64 (/.f64 (sqrt.f64 2) a) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) a) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 a 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 (pow.f64 a 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))) (fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (fma.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (*.f64 1/16 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 (pow.f64 a 5) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5)) (*.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (pow.f64 b 6) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 5) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 6)))) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (sqrt.f64 2) a) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (pow.f64 b 6) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 5) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 6)))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) a) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
(*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) b) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (*.f64 1/2 (/.f64 (sqrt.f64 2) b)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) b) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 4)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) b) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (*.f64 1/2 (/.f64 (sqrt.f64 2) b)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) b) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 (pow.f64 b 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 5)) (/.f64 (*.f64 (pow.f64 a 6) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 4)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) b) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(fma.f64 1/16 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (pow.f64 b 5)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 6) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 5))) (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (*.f64 1/2 (/.f64 (sqrt.f64 2) b)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
(fma.f64 1/16 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (pow.f64 b 5)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 6) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 5))) (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) b) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
(*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(neg.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) b) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (/.f64 (*.f64 -1/2 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(-.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) b) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) -1/2) (*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b)))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 4)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))) (fma.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (/.f64 (*.f64 -1/2 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(fma.f64 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) 1/8 (-.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) b) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) -1/2) (*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 (pow.f64 b 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 4)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))) (fma.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (fma.f64 -1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 5)) (/.f64 (*.f64 (pow.f64 a 6) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5))) (/.f64 (*.f64 -1/2 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(fma.f64 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) 1/8 (-.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 2) b) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) -1/2 (*.f64 (/.f64 -1/16 (pow.f64 b 5)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 6) (*.f64 (sqrt.f64 2) (pow.f64 a 6))) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 5)))) (*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b))))
(*.f64 (sqrt.f64 2) a)
(+.f64 (*.f64 (sqrt.f64 2) a) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))))) a)))
(fma.f64 (sqrt.f64 2) a (*.f64 1/2 (/.f64 (sqrt.f64 2) (/.f64 a (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 a a)) (*.f64 (*.f64 1/32400 (*.f64 b b)) (pow.f64 (PI.f64) 2))))))))
(fma.f64 (sqrt.f64 2) a (/.f64 (*.f64 (*.f64 1/2 (*.f64 (*.f64 angle angle) (sqrt.f64 2))) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 a a) -1/32400) (*.f64 (*.f64 b b) 1/32400)))) a))
(fma.f64 (sqrt.f64 2) a (/.f64 (*.f64 (*.f64 1/2 (*.f64 (*.f64 angle angle) (sqrt.f64 2))) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 b b) 1/32400) (*.f64 (*.f64 a a) -1/32400)))) a))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (*.f64 -1/3149280000 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) a)) 2)))) a)) (+.f64 (*.f64 (sqrt.f64 2) a) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))))) a))))
(fma.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 4)) (-.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 a a) (*.f64 (*.f64 -1/3149280000 (*.f64 b b)) (pow.f64 (PI.f64) 4))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -1/32400 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 a a)) (*.f64 (*.f64 1/32400 (*.f64 b b)) (pow.f64 (PI.f64) 2))) a)) 2))) a) (fma.f64 (sqrt.f64 2) a (*.f64 1/2 (/.f64 (sqrt.f64 2) (/.f64 a (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 a a)) (*.f64 (*.f64 1/32400 (*.f64 b b)) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (*.f64 (pow.f64 angle 4) (-.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 (pow.f64 (PI.f64) 4) (*.f64 (*.f64 b b) -1/3149280000))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 a a) -1/32400) (*.f64 (*.f64 b b) 1/32400))) a)) 2)))) (fma.f64 (sqrt.f64 2) a (/.f64 (*.f64 (*.f64 1/2 (*.f64 (*.f64 angle angle) (sqrt.f64 2))) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 a a) -1/32400) (*.f64 (*.f64 b b) 1/32400)))) a)))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (*.f64 (pow.f64 angle 4) (-.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 (pow.f64 (PI.f64) 4) (*.f64 (*.f64 b b) -1/3149280000))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 b b) 1/32400) (*.f64 (*.f64 a a) -1/32400))) a)) 2)))) (fma.f64 (sqrt.f64 2) a (/.f64 (*.f64 (*.f64 1/2 (*.f64 (*.f64 angle angle) (sqrt.f64 2))) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 b b) 1/32400) (*.f64 (*.f64 a a) -1/32400)))) a)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (*.f64 -1/3149280000 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) a)) 2)))) a)) (+.f64 (*.f64 (sqrt.f64 2) a) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))))) a)) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 6) (-.f64 (+.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (-.f64 (+.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (*.f64 -1/3149280000 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) a)) 2))) (pow.f64 a 2)))))) a)))))
(fma.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 4)) (-.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 a a) (*.f64 (*.f64 -1/3149280000 (*.f64 b b)) (pow.f64 (PI.f64) 4))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -1/32400 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 a a)) (*.f64 (*.f64 1/32400 (*.f64 b b)) (pow.f64 (PI.f64) 2))) a)) 2))) a) (fma.f64 (sqrt.f64 2) a (*.f64 1/2 (+.f64 (/.f64 (sqrt.f64 2) (/.f64 a (*.f64 (*.f64 angle angle) (fma.f64 -1/32400 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 a a)) (*.f64 (*.f64 1/32400 (*.f64 b b)) (pow.f64 (PI.f64) 2)))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 6)) (+.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (*.f64 -1/2 (/.f64 (fma.f64 -1/32400 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 a a)) (*.f64 (*.f64 1/32400 (*.f64 b b)) (pow.f64 (PI.f64) 2))) (/.f64 (*.f64 a a) (-.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 a a) (*.f64 (*.f64 -1/3149280000 (*.f64 b b)) (pow.f64 (PI.f64) 4))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -1/32400 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 a a)) (*.f64 (*.f64 1/32400 (*.f64 b b)) (pow.f64 (PI.f64) 2))) a)) 2))))))) a)))))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (*.f64 (pow.f64 angle 4) (-.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 (pow.f64 (PI.f64) 4) (*.f64 (*.f64 b b) -1/3149280000))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 a a) -1/32400) (*.f64 (*.f64 b b) 1/32400))) a)) 2)))) (fma.f64 1/2 (+.f64 (*.f64 (/.f64 (sqrt.f64 2) a) (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 a a) -1/32400) (*.f64 (*.f64 b b) 1/32400))))) (*.f64 (/.f64 (sqrt.f64 2) a) (*.f64 (pow.f64 angle 6) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 a a) -1/32400) (*.f64 (*.f64 b b) 1/32400))) a) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 (pow.f64 (PI.f64) 4) (*.f64 (*.f64 b b) -1/3149280000))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 a a) -1/32400) (*.f64 (*.f64 b b) 1/32400))) a)) 2)) a)))))))) (*.f64 (sqrt.f64 2) a)))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (*.f64 (pow.f64 angle 4) (-.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 (pow.f64 (PI.f64) 4) (*.f64 (*.f64 b b) -1/3149280000))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 b b) 1/32400) (*.f64 (*.f64 a a) -1/32400))) a)) 2)))) (fma.f64 1/2 (+.f64 (*.f64 (/.f64 (sqrt.f64 2) a) (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 b b) 1/32400) (*.f64 (*.f64 a a) -1/32400))))) (*.f64 (/.f64 (sqrt.f64 2) a) (*.f64 (pow.f64 angle 6) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 b b) 1/32400) (*.f64 (*.f64 a a) -1/32400))) a) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 (pow.f64 (PI.f64) 4) (*.f64 (*.f64 b b) -1/3149280000))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 b b) 1/32400) (*.f64 (*.f64 a a) -1/32400))) a)) 2)) a)))))))) (*.f64 (sqrt.f64 2) a)))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) b) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (*.f64 1/2 (/.f64 (sqrt.f64 2) b)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) b) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 4)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) b) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (*.f64 1/2 (/.f64 (sqrt.f64 2) b)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) b) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 (pow.f64 b 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 5)) (/.f64 (*.f64 (pow.f64 a 6) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 4)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (*.f64 (pow.f64 b 3) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) b) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(fma.f64 1/16 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (pow.f64 b 5)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 6) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 5))) (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (*.f64 1/2 (/.f64 (sqrt.f64 2) b)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
(fma.f64 1/16 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (pow.f64 b 5)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 6) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 5))) (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) b) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
(*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))
(*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (/.f64 (*.f64 1/2 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(fma.f64 1/2 (/.f64 (*.f64 (/.f64 (sqrt.f64 2) a) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) a) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 a 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))) (fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (/.f64 (*.f64 1/2 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 1/2 (/.f64 (*.f64 (/.f64 (sqrt.f64 2) a) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) a) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 a 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 (pow.f64 a 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))) (fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (fma.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (*.f64 1/16 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 (pow.f64 a 5) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5)) (*.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (pow.f64 b 6) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 5) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 6)))) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (sqrt.f64 2) a) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) (fma.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (pow.f64 b 6) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 5) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 6)))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) a) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
(*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 -1 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) -1/2))
(-.f64 (*.f64 (/.f64 (*.f64 (/.f64 (sqrt.f64 2) a) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) -1/2) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(-.f64 (*.f64 (*.f64 -1/2 (/.f64 (sqrt.f64 2) a)) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 a 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))
(fma.f64 -1 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))) 1/8)))
(-.f64 (fma.f64 (/.f64 (*.f64 (/.f64 (sqrt.f64 2) a) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) -1/2 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) 1/8)) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(-.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) -1/2 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) 1/8)) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 (pow.f64 a 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 (pow.f64 a 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(fma.f64 -1 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (fma.f64 -1/16 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 (pow.f64 a 5) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5)) (*.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6)))) (fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))) 1/8))))
(-.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (pow.f64 b 6) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 5) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 6)))) -1/16 (fma.f64 (/.f64 (*.f64 (/.f64 (sqrt.f64 2) a) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) -1/2 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) 1/8))) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(-.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (pow.f64 b 6) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 5) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 6)))) -1/16 (fma.f64 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) -1/2 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 3))) 1/8))) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))
(pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))
(pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(pow.f64 a 2)
(*.f64 a a)
(+.f64 (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 a 2))
(fma.f64 (*.f64 angle angle) (fma.f64 -1/32400 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 a a)) (*.f64 (*.f64 1/32400 (*.f64 b b)) (pow.f64 (PI.f64) 2))) (*.f64 a a))
(fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 a a) -1/32400) (*.f64 (*.f64 b b) 1/32400))) (*.f64 a a))
(fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 b b) 1/32400) (*.f64 (*.f64 a a) -1/32400))) (*.f64 a a))
(+.f64 (*.f64 (pow.f64 angle 4) (+.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (*.f64 -1/3149280000 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4))))) (+.f64 (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 a 2)))
(fma.f64 (pow.f64 angle 4) (fma.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 a a) (*.f64 (*.f64 -1/3149280000 (*.f64 b b)) (pow.f64 (PI.f64) 4))) (fma.f64 (*.f64 angle angle) (fma.f64 -1/32400 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 a a)) (*.f64 (*.f64 1/32400 (*.f64 b b)) (pow.f64 (PI.f64) 2))) (*.f64 a a)))
(fma.f64 (pow.f64 angle 4) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 (pow.f64 (PI.f64) 4) (*.f64 (*.f64 b b) -1/3149280000))) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 a a) -1/32400) (*.f64 (*.f64 b b) 1/32400))) (*.f64 a a)))
(fma.f64 (pow.f64 angle 4) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 (pow.f64 (PI.f64) 4) (*.f64 (*.f64 b b) -1/3149280000))) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 b b) 1/32400) (*.f64 (*.f64 a a) -1/32400))) (*.f64 a a)))
(+.f64 (*.f64 (pow.f64 angle 4) (+.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (*.f64 -1/3149280000 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4))))) (+.f64 (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 angle 6) (+.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))))))))
(fma.f64 (pow.f64 angle 4) (fma.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 a a) (*.f64 (*.f64 -1/3149280000 (*.f64 b b)) (pow.f64 (PI.f64) 4))) (+.f64 (fma.f64 (*.f64 angle angle) (fma.f64 -1/32400 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 a a)) (*.f64 (*.f64 1/32400 (*.f64 b b)) (pow.f64 (PI.f64) 2))) (*.f64 a a)) (*.f64 (pow.f64 angle 6) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))
(fma.f64 (pow.f64 angle 4) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 (pow.f64 (PI.f64) 4) (*.f64 (*.f64 b b) -1/3149280000))) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 a a) -1/32400) (*.f64 (*.f64 b b) 1/32400))) (fma.f64 (pow.f64 angle 6) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (*.f64 (pow.f64 (PI.f64) 6) (*.f64 -1/765275040000000 (*.f64 a a)))) (*.f64 a a))))
(fma.f64 (pow.f64 angle 4) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 (pow.f64 (PI.f64) 4) (*.f64 (*.f64 b b) -1/3149280000))) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 b b) 1/32400) (*.f64 (*.f64 a a) -1/32400))) (fma.f64 (pow.f64 angle 6) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (*.f64 (pow.f64 (PI.f64) 6) (*.f64 -1/765275040000000 (*.f64 a a)))) (*.f64 a a))))
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))
(pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) 1)
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(*.f64 1 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(*.f64 (sqrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(*.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(*.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 4))) (fabs.f64 (cbrt.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(pow.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) 1/2)
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(pow.f64 (cbrt.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 3)
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(pow.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) 1/3)
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(sqrt.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(fabs.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(log.f64 (exp.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(cbrt.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(expm1.f64 (log1p.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(exp.f64 (log.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 1))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(log1p.f64 (expm1.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) 1)
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(*.f64 1 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 4))) (fabs.f64 (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(pow.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) 1/2)
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 3)
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(pow.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) 1/3)
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(fabs.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(log.f64 (exp.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(exp.f64 (log.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 1))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))
(-.f64 (exp.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))) 1)
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(*.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1)
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(*.f64 1 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) (sqrt.f64 2))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))
(*.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/4) (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/4))
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))) (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))) (cbrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2))))
(*.f64 (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))) (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))) (cbrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2))))
(*.f64 (sqrt.f64 (cbrt.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2) 4))) (sqrt.f64 (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(*.f64 (sqrt.f64 (cbrt.f64 (*.f64 4 (pow.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)) 2)))) (sqrt.f64 (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 (cbrt.f64 (*.f64 4 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 4)))) (sqrt.f64 (cbrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))))
(*.f64 (pow.f64 1 1/2) (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2) 4)) 1/2) (pow.f64 (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1/2))
(*.f64 (sqrt.f64 (cbrt.f64 (*.f64 4 (pow.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)) 2)))) (sqrt.f64 (cbrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 (cbrt.f64 (*.f64 4 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 4)))) (sqrt.f64 (cbrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))))
(pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/2)
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(pow.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1)
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/4) 2)
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(pow.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) 3)
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 3/2) 1/3)
(cbrt.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) 3/2))
(cbrt.f64 (pow.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)) 3/2))
(fabs.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(log.f64 (exp.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(log.f64 (+.f64 1 (expm1.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))))
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(cbrt.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 3/2))
(cbrt.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) 3/2))
(cbrt.f64 (pow.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)) 3/2))
(expm1.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(exp.f64 (log.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(exp.f64 (*.f64 (log.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1/2))
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) 1))
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(log1p.f64 (expm1.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(sqrt.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)))
(+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 1 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1)) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(+.f64 (*.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1) 1) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(-.f64 (exp.f64 (log1p.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1)
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2))) (-.f64 1 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (-.f64 1 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))
(+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (expm1.f64 (log1p.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2))))
(-.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (exp.f64 (log1p.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)))) 1)
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (-.f64 1 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))
(+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (expm1.f64 (log1p.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2))))
(-.f64 (+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 1) (exp.f64 (log1p.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)))) 1)
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (-.f64 1 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))
(+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (expm1.f64 (log1p.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 1)
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(*.f64 1 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(*.f64 (cbrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) (cbrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2)))
(*.f64 (cbrt.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)) 2)))
(*.f64 (cbrt.f64 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)) (cbrt.f64 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 4)))
(*.f64 (cbrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2)) (cbrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(*.f64 (cbrt.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)) 2)))
(*.f64 (cbrt.f64 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)) (cbrt.f64 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 4)))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 4))) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)))
(/.f64 (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4))) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))
(/.f64 (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4)) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) 3) (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 3)) (+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) 3) (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) 3)) (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 4) (*.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (-.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) 3) (pow.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) 3)) (fma.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (-.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4)))
(/.f64 (*.f64 1 (-.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 4)))) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)))
(/.f64 (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4))) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))
(/.f64 (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4)) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)))
(/.f64 (*.f64 1 (+.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) 3) (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 3))) (+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) 3) (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) 3)) (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 4) (*.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (-.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) 3) (pow.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) 3)) (fma.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (-.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4)))
(/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 4))) 1) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)))
(/.f64 (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4))) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))
(/.f64 (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4) (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4)) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) 3) (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) 3)) 1) (+.f64 (*.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) 3) (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) 3)) (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 4) (*.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (-.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) 3) (pow.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) 3)) (fma.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (-.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 4)))
(pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 1)
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 2)
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(pow.f64 (cbrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 3)
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(pow.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 3) 1/3)
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(sqrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 2))
(sqrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)) 2))
(sqrt.f64 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 4))
(log.f64 (exp.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(log.f64 (+.f64 1 (expm1.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(cbrt.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)) 3))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(expm1.f64 (log1p.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(exp.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)
(log1p.f64 (expm1.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)

localize282.0ms (0.2%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
71.7%
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
57.4%
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
57.3%
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
56.9%
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
Compiler

Compiled 807 to 453 computations (43.9% saved)

series45.0ms (0%)

Counts
2 → 72
Calls

18 calls:

TimeVariablePointExpression
8.0ms
angle
@0
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
6.0ms
x-scale
@0
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
4.0ms
x-scale
@inf
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
4.0ms
angle
@inf
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
4.0ms
y-scale
@inf
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))

rewrite125.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
714×add-sqr-sqrt
702×*-un-lft-identity
696×pow1
660×add-exp-log
660×add-log-exp
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
032438
1705438
Stop Event
node limit
Counts
2 → 28
Calls
Call 1
Inputs
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
Outputs
(((*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 1 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (sqrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1/4) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1/4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (pow.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 1/2) (pow.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((pow.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((log.f64 (exp.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((cbrt.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((expm1.f64 (log1p.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((exp.f64 (log.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((log1p.f64 (expm1.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)))
(((*.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 1 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (sqrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/4) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1/2) (pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((log.f64 (exp.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((cbrt.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((expm1.f64 (log1p.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((exp.f64 (log.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((log1p.f64 (expm1.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)))

simplify552.0ms (0.4%)

Algorithm
egg-herbie
Rules
1148×times-frac
972×associate-*r*
962×associate-/r*
894×associate-/l*
780×*-commutative
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
053740792
1190140182
Stop Event
node limit
Counts
100 → 147
Calls
Call 1
Inputs
(/.f64 (sqrt.f64 2) y-scale)
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 2))) (/.f64 (sqrt.f64 2) y-scale))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 2))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))))) (sqrt.f64 2))) 2)))) (sqrt.f64 2))) (/.f64 (sqrt.f64 2) y-scale)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 2))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))))) (sqrt.f64 2))) 2)))) (sqrt.f64 2))) (+.f64 (/.f64 (sqrt.f64 2) y-scale) (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 6) (-.f64 (+.f64 (*.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 -2 (/.f64 (-.f64 (+.f64 (*.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (*.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (*.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))) (*.f64 4 (+.f64 (*.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (*.f64 1/2 (*.f64 (pow.f64 y-scale 4) (*.f64 (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))))))) (+.f64 (*.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (*.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))))) (sqrt.f64 2))) 2)))) (pow.f64 (sqrt.f64 2) 2)))))) (sqrt.f64 2))))))
(sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) y-scale) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 3) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) y-scale) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 3) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 5) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) y-scale) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))))
(/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 6) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 6) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 3) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 3) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 5) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 4) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 4) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 y-scale 6))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (*.f64 (pow.f64 y-scale 2) (+.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 6) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))))
(/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 4) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 4) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 y-scale 6))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (*.f64 (pow.f64 y-scale 2) (+.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 6) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))))
(/.f64 1 (pow.f64 y-scale 2))
(+.f64 (/.f64 1 (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))))) (+.f64 (/.f64 1 (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))))) (+.f64 (/.f64 1 (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 angle 6) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (*.f64 -2 (/.f64 (-.f64 (+.f64 (*.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (*.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (*.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2)))))) (*.f64 1/2 (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (*.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 y-scale 6) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (*.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 y-scale 6) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (*.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (*.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (*.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 1)
(*.f64 1 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (sqrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(*.f64 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(*.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1/4) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1/4))
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 1/2) (pow.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 1/2))
(pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1/2)
(pow.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 1)
(log.f64 (exp.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(cbrt.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(expm1.f64 (log1p.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(exp.f64 (log.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(log1p.f64 (expm1.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(*.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1)
(*.f64 1 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(*.f64 (sqrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(*.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(*.f64 (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(*.f64 (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/4) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/4))
(*.f64 (pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1/2) (pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1/2))
(pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/2)
(pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1)
(log.f64 (exp.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(cbrt.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(expm1.f64 (log1p.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(exp.f64 (log.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(log1p.f64 (expm1.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
Outputs
(/.f64 (sqrt.f64 2) y-scale)
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 2))) (/.f64 (sqrt.f64 2) y-scale))
(fma.f64 1/2 (/.f64 y-scale (/.f64 (sqrt.f64 2) (*.f64 (*.f64 angle angle) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))))))) (/.f64 (sqrt.f64 2) y-scale))
(fma.f64 1/2 (/.f64 (*.f64 (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (*.f64 (/.f64 -1/32400 y-scale) (/.f64 (pow.f64 (PI.f64) 2) y-scale)))) (*.f64 y-scale (*.f64 angle angle))) (sqrt.f64 2)) (/.f64 (sqrt.f64 2) y-scale))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 2))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))))) (sqrt.f64 2))) 2)))) (sqrt.f64 2))) (/.f64 (sqrt.f64 2) y-scale)))
(fma.f64 1/2 (/.f64 y-scale (/.f64 (sqrt.f64 2) (*.f64 (*.f64 angle angle) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))))))) (fma.f64 1/2 (/.f64 y-scale (/.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (fma.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/787320000) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/4199040000)))) (pow.f64 (*.f64 1/2 (/.f64 y-scale (/.f64 (sqrt.f64 2) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))))))) 2))))) (/.f64 (sqrt.f64 2) y-scale)))
(fma.f64 1/2 (/.f64 (*.f64 (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (*.f64 (/.f64 -1/32400 y-scale) (/.f64 (pow.f64 (PI.f64) 2) y-scale)))) (*.f64 y-scale (*.f64 angle angle))) (sqrt.f64 2)) (fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 angle 4) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (fma.f64 1/2 (*.f64 y-scale (*.f64 y-scale (+.f64 (+.f64 (pow.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) -1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/196830000) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (*.f64 (/.f64 -1/32400 y-scale) (/.f64 (pow.f64 (PI.f64) 2) y-scale)))))) 2)))) (/.f64 (sqrt.f64 2) y-scale)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))))) (sqrt.f64 2))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))))) (sqrt.f64 2))) 2)))) (sqrt.f64 2))) (+.f64 (/.f64 (sqrt.f64 2) y-scale) (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 6) (-.f64 (+.f64 (*.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 -2 (/.f64 (-.f64 (+.f64 (*.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (*.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (*.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))) (*.f64 4 (+.f64 (*.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (*.f64 1/2 (*.f64 (pow.f64 y-scale 4) (*.f64 (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))))))) (+.f64 (*.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (*.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))))) (sqrt.f64 2))) 2)))) (pow.f64 (sqrt.f64 2) 2)))))) (sqrt.f64 2))))))
(fma.f64 1/2 (/.f64 y-scale (/.f64 (sqrt.f64 2) (*.f64 (*.f64 angle angle) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))))))) (+.f64 (fma.f64 1/2 (/.f64 y-scale (/.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (fma.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/787320000) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/4199040000)))) (pow.f64 (*.f64 1/2 (/.f64 y-scale (/.f64 (sqrt.f64 2) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))))))) 2))))) (/.f64 (sqrt.f64 2) y-scale)) (*.f64 1/2 (/.f64 y-scale (/.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 6) (+.f64 (fma.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (+.f64 (fma.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000)) (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (fma.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000)) (fma.f64 -2 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 x-scale x-scale)) 1/765275040000000) (*.f64 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale y-scale)) -1/765275040000000)) (*.f64 y-scale y-scale)) (*.f64 4 (fma.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) (fma.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) (fma.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))))))))))) (*.f64 -1/2 (*.f64 (pow.f64 y-scale 4) (*.f64 (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/787320000) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))))))) (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 x-scale x-scale)) 1/765275040000000) (*.f64 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale y-scale)) -1/12244400640000000)))) (*.f64 -1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/787320000) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000))) (pow.f64 (*.f64 1/2 (/.f64 y-scale (/.f64 (sqrt.f64 2) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))))))) 2)))))))))))))
(+.f64 (fma.f64 1/2 (/.f64 (*.f64 (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (*.f64 (/.f64 -1/32400 y-scale) (/.f64 (pow.f64 (PI.f64) 2) y-scale)))) (*.f64 y-scale (*.f64 angle angle))) (sqrt.f64 2)) (fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 angle 4) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (fma.f64 1/2 (*.f64 y-scale (*.f64 y-scale (+.f64 (+.f64 (pow.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) -1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/196830000) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (*.f64 (/.f64 -1/32400 y-scale) (/.f64 (pow.f64 (PI.f64) 2) y-scale)))))) 2)))) (/.f64 (sqrt.f64 2) y-scale))) (/.f64 (*.f64 (*.f64 1/2 (*.f64 y-scale (pow.f64 angle 6))) (-.f64 (fma.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (+.f64 (+.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale y-scale)) 1/765275040000000)) (*.f64 y-scale y-scale)) (*.f64 4 (+.f64 (fma.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) y-scale) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 x-scale x-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) 13/1224440064000000)))) (*.f64 2 (*.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) -1/3149280000))))) (*.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) -1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/196830000) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))) (*.f64 (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))) (pow.f64 y-scale 4))) -1/2))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale y-scale)) -1/12244400640000000)))) (/.f64 (*.f64 1/2 (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (*.f64 (/.f64 -1/32400 y-scale) (/.f64 (pow.f64 (PI.f64) 2) y-scale)))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (fma.f64 1/2 (*.f64 y-scale (*.f64 y-scale (+.f64 (+.f64 (pow.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) -1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/196830000) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (*.f64 (/.f64 -1/32400 y-scale) (/.f64 (pow.f64 (PI.f64) 2) y-scale)))))) 2))))))) (sqrt.f64 2)))
(sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)
(*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) y-scale) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))
(fma.f64 1/2 (*.f64 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 2)) (/.f64 y-scale (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))
(fma.f64 1/2 (*.f64 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) y-scale) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 3) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) y-scale) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))
(fma.f64 1/2 (*.f64 (/.f64 (pow.f64 y-scale 3) (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 2)) (/.f64 y-scale (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))
(fma.f64 1/2 (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))) 2)) (sqrt.f64 2)) (/.f64 (pow.f64 y-scale 3) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) y-scale) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 3) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 5) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) y-scale) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))))
(fma.f64 1/2 (*.f64 (/.f64 (pow.f64 y-scale 3) (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 1/2 (/.f64 (pow.f64 y-scale 5) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (-.f64 (*.f64 -1/4 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (*.f64 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 2)) (/.f64 y-scale (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))))
(fma.f64 1/2 (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))) 2)) (sqrt.f64 2)) (/.f64 (pow.f64 y-scale 3) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) (fma.f64 1/2 (*.f64 (/.f64 (pow.f64 y-scale 5) (sqrt.f64 2)) (/.f64 (fma.f64 -1/4 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 6) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) (/.f64 (*.f64 -1/2 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))))) (/.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))) 2))))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) y-scale) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
(/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))
(fma.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (sqrt.f64 2)) (/.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (fma.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (sqrt.f64 2)) (/.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (sqrt.f64 2)))) 2)) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 6) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (fma.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 y-scale 6)) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (*.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (sqrt.f64 2)) (/.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))) (fma.f64 1/2 (*.f64 (/.f64 (fma.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 6) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))) (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2)))) (*.f64 (*.f64 -1/2 (/.f64 x-scale (/.f64 (pow.f64 (sqrt.f64 2) 2) x-scale))) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (sqrt.f64 2)))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))))))) (sqrt.f64 2)) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 y-scale 6)))) (+.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (sqrt.f64 2)))) 2)) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))))))))
(/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))
(fma.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (sqrt.f64 2)) (/.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (fma.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (sqrt.f64 2)) (/.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (sqrt.f64 2)))) 2)) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 6) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (fma.f64 1/2 (/.f64 x-scale (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 y-scale 6)) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (+.f64 (*.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (*.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 1/2 (*.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (sqrt.f64 2)) (/.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))) (fma.f64 1/2 (*.f64 (/.f64 (fma.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 6) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))) (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2)))) (*.f64 (*.f64 -1/2 (/.f64 x-scale (/.f64 (pow.f64 (sqrt.f64 2) 2) x-scale))) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (sqrt.f64 2)))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))))))) (sqrt.f64 2)) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 y-scale 6)))) (+.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2)))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (sqrt.f64 2)))) 2)) (*.f64 (pow.f64 y-scale 4) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))))))))
(/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (*.f64 1/2 (*.f64 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))) (sqrt.f64 2)) (/.f64 x-scale (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 3) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 3) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (*.f64 (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))) 2))) (+.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (*.f64 1/2 (*.f64 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))) (sqrt.f64 2)) (/.f64 x-scale (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 3) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 5) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 3) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (+.f64 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 (/.f64 (pow.f64 x-scale 5) (sqrt.f64 2)) (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))))) (*.f64 -1/2 (*.f64 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (*.f64 (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))) 2))) (+.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (*.f64 1/2 (+.f64 (*.f64 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))) (sqrt.f64 2)) (/.f64 x-scale (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) (*.f64 (/.f64 (fma.f64 -1/4 (*.f64 (/.f64 (*.f64 2 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 6)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2))) (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))) (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))) 2)) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) -1/2)) (sqrt.f64 2)) (/.f64 (pow.f64 x-scale 5) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))))
(/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)
(*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (*.f64 (sqrt.f64 2) (*.f64 x-scale x-scale)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 4) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 x-scale 4)))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (*.f64 (sqrt.f64 2) (*.f64 x-scale x-scale)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (sqrt.f64 2)))) 2)) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 x-scale 4)))) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 4) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 y-scale 6))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (*.f64 (pow.f64 y-scale 2) (+.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 6) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 x-scale 4)))) (fma.f64 1/2 (/.f64 y-scale (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 x-scale 6))) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 y-scale 6) (*.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 -1/2 (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (*.f64 (sqrt.f64 2) (*.f64 x-scale x-scale)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (sqrt.f64 2)))) 2)) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 x-scale 4)))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/4 (*.f64 (/.f64 (*.f64 2 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 6)) (*.f64 (pow.f64 y-scale 6) (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2)))) (*.f64 (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (sqrt.f64 2)))) 2)) (pow.f64 (sqrt.f64 2) 2))) (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 x-scale 6)))) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
(/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)
(*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (*.f64 (sqrt.f64 2) (*.f64 x-scale x-scale)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 4) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 x-scale 4)))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (*.f64 (sqrt.f64 2) (*.f64 x-scale x-scale)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (sqrt.f64 2)))) 2)) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 x-scale 4)))) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (-.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 4) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 y-scale 6))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (+.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (*.f64 (pow.f64 y-scale 2) (+.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 x-scale 6) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 x-scale 4)))) (fma.f64 1/2 (/.f64 y-scale (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 x-scale 6))) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 y-scale 6) (*.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 -1/2 (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) 2)) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (*.f64 (sqrt.f64 2) (*.f64 x-scale x-scale)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.f64 (*.f64 1/2 (*.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (sqrt.f64 2)))) 2)) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 x-scale 4)))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/4 (*.f64 (/.f64 (*.f64 2 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 6)) (*.f64 (pow.f64 y-scale 6) (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2)))) (*.f64 (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (sqrt.f64 2)))) 2)) (pow.f64 (sqrt.f64 2) 2))) (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 x-scale 6)))) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
(/.f64 1 (pow.f64 y-scale 2))
(/.f64 1 (*.f64 y-scale y-scale))
(+.f64 (/.f64 1 (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(+.f64 (/.f64 1 (*.f64 y-scale y-scale)) (*.f64 1/2 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 angle angle)) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))))
(+.f64 (/.f64 1 (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 angle angle) (*.f64 1/2 (*.f64 y-scale y-scale))) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))))
(+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))))) (+.f64 (/.f64 1 (pow.f64 y-scale 2)) (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(fma.f64 1/2 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 angle 4)) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/787320000) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))) (+.f64 (/.f64 1 (*.f64 y-scale y-scale)) (*.f64 1/2 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 angle angle)) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))))))
(fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 angle 4) (+.f64 (+.f64 (pow.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) -1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/196830000) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))))) (+.f64 (/.f64 1 (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 angle angle) (*.f64 1/2 (*.f64 y-scale y-scale))) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))))
(+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))))) (+.f64 (/.f64 1 (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 angle 6) (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (*.f64 -2 (/.f64 (-.f64 (+.f64 (*.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (*.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (*.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2)))))) (*.f64 1/2 (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (+.f64 (*.f64 4 (+.f64 (*.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (*.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)) (+.f64 (*.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))))))
(fma.f64 1/2 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 angle 4)) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/787320000) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))) (+.f64 (/.f64 1 (*.f64 y-scale y-scale)) (*.f64 1/2 (+.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 angle angle)) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 angle 6) (+.f64 (fma.f64 4 (fma.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) (fma.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) (fma.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000)) (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (fma.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000)) (*.f64 -2 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 x-scale x-scale)) 1/765275040000000) (*.f64 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale y-scale)) -1/765275040000000)) (*.f64 y-scale y-scale)))))) (*.f64 -1/2 (*.f64 (pow.f64 y-scale 4) (*.f64 (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))) (-.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/787320000) (+.f64 (pow.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (-.f64 (*.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) 1/3149280000)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (*.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))))))))))))
(fma.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 angle 4) (+.f64 (+.f64 (pow.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) -1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/196830000) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))))) (+.f64 (/.f64 1 (*.f64 y-scale y-scale)) (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 angle (*.f64 angle (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) (*.f64 (pow.f64 angle 6) (+.f64 (+.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale y-scale)) 1/765275040000000)) (*.f64 y-scale y-scale)) (*.f64 4 (+.f64 (fma.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) y-scale) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 x-scale x-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) 6) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) 13/1224440064000000)))) (*.f64 2 (*.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) -1/3149280000))))) (*.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) 2) (*.f64 -2 (/.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale y-scale)) -1/3149280000)) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) -1/196830000) (pow.f64 (*.f64 1/2 (*.f64 (*.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))))) 2))) (*.f64 (fma.f64 -2 (/.f64 (*.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) (*.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))) (pow.f64 y-scale 4))) -1/2))))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))
(+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(fma.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))
(fma.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))
(fma.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (fma.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2))) (fma.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (*.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(fma.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (fma.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (fma.f64 -1/4 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 x-scale 4)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2))) (fma.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (fma.f64 -1/4 (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2)) (*.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 2 (pow.f64 x-scale 4)))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 6)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))))
(/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (*.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale x-scale) (/.f64 y-scale x-scale))) (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (+.f64 (*.f64 (*.f64 (/.f64 y-scale x-scale) (/.f64 y-scale x-scale)) (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 y-scale 6) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (*.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 -1/4 (*.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (*.f64 (/.f64 y-scale x-scale) (/.f64 y-scale x-scale)) (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) (fma.f64 -1/4 (*.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (*.f64 2 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 6) (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale 4))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))))
(/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (*.f64 (*.f64 1/2 (*.f64 (/.f64 y-scale x-scale) (/.f64 y-scale x-scale))) (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (+.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (+.f64 (*.f64 (*.f64 (/.f64 y-scale x-scale) (/.f64 y-scale x-scale)) (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 y-scale 6) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (*.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 -1/4 (*.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2) (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) 2)))) 2)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (*.f64 (/.f64 y-scale x-scale) (/.f64 y-scale x-scale)) (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) (fma.f64 -1/4 (*.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (*.f64 2 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 6) (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale 4))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 y-scale y-scale))) 2)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))))
(/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (+.f64 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (*.f64 1/2 (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (fma.f64 -1/4 (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))))) (*.f64 1/2 (+.f64 (/.f64 (*.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (fma.f64 -1/4 (*.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 6)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2)))) (*.f64 1/2 (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)) (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2)))))))
(/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(fma.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (fma.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2)) (pow.f64 y-scale 4)))))
(+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (*.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(fma.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (pow.f64 y-scale 6)) (*.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))))) (+.f64 (fma.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(fma.f64 -1/4 (*.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 6) (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2))))) (+.f64 (fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2)) (pow.f64 y-scale 4))))))
(/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(fma.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (fma.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2)) (pow.f64 y-scale 4)))))
(+.f64 (*.f64 -1/4 (/.f64 (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (*.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 -2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(fma.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (pow.f64 y-scale 6)) (*.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))))) (+.f64 (fma.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2))) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(fma.f64 -1/4 (*.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 6) (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2))))) (+.f64 (fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))) 2)) (pow.f64 y-scale 4))))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 1)
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 1 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (sqrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))) (cbrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))))
(*.f64 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))) (cbrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))))
(*.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1/4) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1/4))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 1/2) (pow.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 1/2))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1/2)
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(pow.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 1)
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(log.f64 (exp.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(cbrt.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(cbrt.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(cbrt.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))))
(expm1.f64 (log1p.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(exp.f64 (log.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(log1p.f64 (expm1.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1)
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(*.f64 1 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(*.f64 (sqrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(*.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(*.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(*.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))
(*.f64 (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(*.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(*.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))
(*.f64 (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/4) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/4))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(*.f64 (pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1/2) (pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1/2))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/2)
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1)
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(log.f64 (exp.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(cbrt.f64 (*.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(cbrt.f64 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(cbrt.f64 (*.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)) (sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(expm1.f64 (log1p.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(exp.f64 (log.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(log1p.f64 (expm1.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))

localize560.0ms (0.4%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
57.4%
(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
57.0%
(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
48.8%
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
35.5%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
Compiler

Compiled 1612 to 932 computations (42.2% saved)

series511.0ms (0.4%)

Counts
2 → 120
Calls

30 calls:

TimeVariablePointExpression
94.0ms
x-scale
@inf
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
76.0ms
a
@inf
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
63.0ms
b
@0
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
23.0ms
b
@0
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
19.0ms
a
@0
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))

rewrite124.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1588×add-sqr-sqrt
1560×*-un-lft-identity
1460×add-exp-log
1460×add-cbrt-cube
1460×add-cube-cbrt
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0691036
115921036
Stop Event
node limit
Counts
2 → 18
Calls
Call 1
Inputs
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
Outputs
(((/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((pow.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((neg.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (pow.f64 (*.f64 x-scale y-scale) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((log.f64 (exp.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((cbrt.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((exp.f64 (log.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)))
(((*.f64 1 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (/.f64 1 (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((*.f64 (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((*.f64 (*.f64 (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((pow.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((log.f64 (exp.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((exp.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) #f)))

simplify1.7s (1.2%)

Algorithm
egg-herbie
Rules
1792×associate-*r/
1424×*-commutative
1362×+-commutative
760×associate-+r+
672×associate-*r*
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
01554268540
16195268532
Stop Event
node limit
Counts
138 → 348
Calls
Call 1
Inputs
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) 2)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2)) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 -8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 8)))) (pow.f64 b 2)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2)) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2))))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 8)))) (pow.f64 b 2)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2))))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 -8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (*.f64 (pow.f64 b 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 b 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))) (*.f64 (pow.f64 a 3) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (sqrt.f64 8)))) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (sqrt.f64 8)))) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 6) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) 2))) (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 (pow.f64 angle 2) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 (pow.f64 angle 2) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b)))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (+.f64 (*.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (*.f64 1/22674816000000 (*.f64 (pow.f64 (PI.f64) 5) (+.f64 a b))))) (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))) (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 6) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 (pow.f64 angle 2) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) 2)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 (pow.f64 b 3) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 -8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2))) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2))) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 -8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (*.f64 (pow.f64 b 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 b 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))) (*.f64 (pow.f64 a 3) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))))))
(*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(+.f64 (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) 2))) (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 (pow.f64 angle 2) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2)))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 (pow.f64 angle 2) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (+.f64 (*.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (*.f64 1/22674816000000 (*.f64 (pow.f64 (PI.f64) 5) (+.f64 a b))))) (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))) (*.f64 (pow.f64 angle 6) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 (pow.f64 angle 2) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2)))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) 1)
(neg.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(log.f64 (exp.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(cbrt.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(expm1.f64 (log1p.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(exp.f64 (log.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(log1p.f64 (expm1.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(*.f64 1 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (/.f64 1 (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(*.f64 (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(*.f64 (*.f64 (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) 1)
(log.f64 (exp.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(expm1.f64 (log1p.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(exp.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(log1p.f64 (expm1.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
Outputs
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (*.f64 (*.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (*.f64 (sqrt.f64 8) b) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 -1/2 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sqrt.f64 8) b) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) 2))) (*.f64 (sqrt.f64 8) (*.f64 b b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (*.f64 (*.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (*.f64 (sqrt.f64 8) b) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2))) (*.f64 (sqrt.f64 8) (*.f64 b b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 -1/2 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sqrt.f64 8) b) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) 2)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) 2))) (*.f64 (sqrt.f64 8) (*.f64 b b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (*.f64 (sqrt.f64 8) b) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (*.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 1/2 (+.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))))) (*.f64 y-scale x-scale)) (*.f64 4 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))) (*.f64 (*.f64 x-scale (pow.f64 b 3)) (sqrt.f64 8))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2))) (*.f64 (sqrt.f64 8) (*.f64 b b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (fma.f64 -1/2 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sqrt.f64 8) b) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))) 2)))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))))) (/.f64 (*.f64 -2 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2)))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))) (*.f64 y-scale x-scale))) (*.f64 x-scale (*.f64 (sqrt.f64 8) (pow.f64 b 3))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (*.f64 1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (*.f64 1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2)) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) b))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) b))))
(+.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 -8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 8)))) (pow.f64 b 2)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2)) (sqrt.f64 8)))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (fma.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (*.f64 -8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 y-scale x-scale))))) (*.f64 -2 (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 b b)) (fma.f64 1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) b)))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 y-scale (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 -8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) y-scale))) (/.f64 (*.f64 -4 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 y-scale x-scale))))) (*.f64 -2 (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))))))) (fma.f64 1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) b)))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2))))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) b))))
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 8)))) (pow.f64 b 2)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2))))) b) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale))) (*.f64 4 (*.f64 (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))))))))) (*.f64 2 (*.f64 (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) 2)))))))))) (*.f64 b b))) (fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) b)))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) y-scale))) (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (/.f64 (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))))))))) (*.f64 2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2)))))))))) (*.f64 b b))) (fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))
(fma.f64 1/2 (*.f64 a (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))))))))) (*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))))))
(fma.f64 1/2 (*.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 1/2 (*.f64 a (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (*.f64 a a)) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))))))))
(fma.f64 1/2 (*.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (*.f64 a a) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 -8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (*.f64 (pow.f64 b 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 b 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))) (*.f64 (pow.f64 a 3) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 -8 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (*.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))) 2)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b)))) (*.f64 y-scale x-scale))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b)) (-.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale)))) 2)))))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))) (*.f64 (sqrt.f64 8) (pow.f64 a 3))))) (fma.f64 1/2 (*.f64 a (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (*.f64 a a)) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))))) (*.f64 -2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))))) 2))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))))) 2))))))))) (*.f64 (sqrt.f64 8) (pow.f64 a 3)))))) (fma.f64 1/2 (*.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (*.f64 a a) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))) (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) a) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))) a) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))) (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (sqrt.f64 8)))) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) a) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))))) (fma.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (*.f64 4 (/.f64 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (*.f64 y-scale x-scale)))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (*.f64 a a)) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))) a) (fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (/.f64 y-scale (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 8 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)))))) (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))))) (*.f64 -2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) 2))))))))))))) (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) a) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))) a) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (sqrt.f64 8)))) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 a (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))))) (fma.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (*.f64 4 (/.f64 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (*.f64 y-scale x-scale)))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (*.f64 a a)) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) a) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (/.f64 y-scale (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 8 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)))))) (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))))) (*.f64 -2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) 2))))))))))))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) 2))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))) a) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 6) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 x-scale 6) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2)))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 x-scale 6) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))
(fma.f64 1/8 (*.f64 (/.f64 y-scale (/.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))
(fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))
(fma.f64 1/8 (*.f64 (/.f64 y-scale (/.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) 2))))))) (*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))))
(fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2)))))) (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))))
(fma.f64 1/8 (*.f64 (/.f64 y-scale (/.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale (-.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2)))))))))) (/.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2))))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale 5)) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) 2))))))) (*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))))
(fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 3) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) (*.f64 -1/2 (/.f64 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2)))))) (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))
(fma.f64 -1/8 (*.f64 (/.f64 y-scale (/.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))
(fma.f64 -1/8 (*.f64 (/.f64 y-scale (/.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) 2))))))) (*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2)))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8))) (pow.f64 x-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (*.f64 y-scale (-.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2)))))))))) (/.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2))))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale 5)) (fma.f64 -1/8 (*.f64 (/.f64 y-scale (/.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) 2))))))) (*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 5) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 3) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) (*.f64 -1/2 (/.f64 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))) (fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2)))))) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(*.f64 (*.f64 1/4 (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (*.f64 (*.f64 1/4 (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 4) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (*.f64 (*.f64 1/4 (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 6) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) 2))) (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (+.f64 (*.f64 1/8 (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 6) (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (/.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 3) (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 4) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (*.f64 (*.f64 1/4 (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))))
(fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (pow.f64 y-scale 6) (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 -1/4 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2))) (/.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 3) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 -1/2 (/.f64 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2))) (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (fma.f64 1/8 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 1/4 (*.f64 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 1/4 (*.f64 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)))))) (fma.f64 1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 1/4 (*.f64 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)))))) (fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)))))) (fma.f64 1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) (pow.f64 y-scale 5))) (*.f64 1/4 (*.f64 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)))))) (fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))) (fma.f64 1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 -1/4 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))))))) (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))
(*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)))))) (*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8))) (pow.f64 y-scale 5)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 x-scale (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))) (pow.f64 y-scale 3)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) (pow.f64 y-scale 5))) (fma.f64 -1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)))))) (*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 (pow.f64 y-scale 5) (*.f64 (sqrt.f64 8) (-.f64 (/.f64 (*.f64 -1/4 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))))))) (fma.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 3) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)))))) (*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))))
(+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 (pow.f64 angle 2) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (*.f64 (sqrt.f64 8) (*.f64 angle angle)))) (*.f64 b (sqrt.f64 2)))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (*.f64 (sqrt.f64 8) (*.f64 angle angle)))) b))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 (pow.f64 angle 2) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b)))))
(fma.f64 1/8 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 y-scale (pow.f64 angle 4)) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 1/45 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))))) (fma.f64 1/45 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))))) (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) b))) 2)))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (*.f64 (sqrt.f64 8) (*.f64 angle angle)))) (*.f64 b (sqrt.f64 2))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) 2) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (*.f64 1/45 (+.f64 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) b))) 2))))) b)) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (*.f64 (sqrt.f64 8) (*.f64 angle angle)))) b)))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (+.f64 (*.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (*.f64 1/22674816000000 (*.f64 (pow.f64 (PI.f64) 5) (+.f64 a b))))) (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))) (*.f64 (pow.f64 x-scale 2) (*.f64 (pow.f64 angle 6) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))) (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 1/8 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 (pow.f64 angle 2) (sqrt.f64 8))))) (*.f64 (sqrt.f64 2) b))))))
(fma.f64 1/8 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 y-scale (pow.f64 angle 4)) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 1/45 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))))) (fma.f64 1/45 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))))) (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) b))) 2)))))) (fma.f64 1/8 (/.f64 y-scale (/.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (fma.f64 2/45 (*.f64 (/.f64 (fma.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (fma.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (*.f64 (*.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 x-scale x-scale))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) 2) (*.f64 y-scale y-scale))) (*.f64 (*.f64 2 (-.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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))))))) (*.f64 -1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) 2) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (*.f64 1/45 (+.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))))) (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b)))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) (fma.f64 1/2 (/.f64 (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) 2) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (*.f64 1/45 (+.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))))) (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b)))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) b))) 2))) (*.f64 b b)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (pow.f64 angle 6)))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (*.f64 (sqrt.f64 8) (*.f64 angle angle)))) (*.f64 b (sqrt.f64 2)))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) 2) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (*.f64 1/45 (+.f64 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) b))) 2))))) b)) (fma.f64 1/8 (*.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (fma.f64 2/45 (*.f64 (/.f64 (fma.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (fma.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (*.f64 (*.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 x-scale x-scale))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2) (*.f64 y-scale y-scale))) (*.f64 2 (*.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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 -1/2 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) 2) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (*.f64 1/45 (+.f64 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (/.f64 (*.f64 -1/2 (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) 2) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (*.f64 1/45 (+.f64 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) b))) 2)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (pow.f64 angle 6)))) b)) (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (*.f64 (sqrt.f64 8) (*.f64 angle angle)))) b))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) b)))) (*.f64 y-scale y-scale)))) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) b)))) (*.f64 y-scale y-scale)))) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) b)))) (*.f64 y-scale y-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) b)))) (*.f64 y-scale y-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) 2)) (*.f64 (pow.f64 b 2) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) 2)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (*.f64 (pow.f64 b 3) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) b)))) (*.f64 y-scale y-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 1/2 (+.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))))) (*.f64 y-scale x-scale)) (*.f64 4 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) 2)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (pow.f64 b 3)) y-scale)))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) b)))) (*.f64 y-scale y-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) y-scale)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))) 2)))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))))) (/.f64 (*.f64 -2 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 -2 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) 2)))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))) (*.f64 y-scale x-scale))) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (pow.f64 b 3)) y-scale)))))))
(*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (*.f64 -1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 -1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 -1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale x-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (*.f64 -1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (*.f64 -1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 -1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 -8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale x-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (*.f64 -8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale))) (*.f64 -4 (/.f64 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 y-scale x-scale))))) (*.f64 -2 (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b b))) (sqrt.f64 8))))))))
(fma.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2)) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 -8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) y-scale))) (/.f64 (*.f64 -4 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 y-scale x-scale))))) (*.f64 -2 (*.f64 (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b b))) (sqrt.f64 8))))))))
(*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (*.f64 1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 1/4 (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2))) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale x-scale)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (*.f64 1/8 (*.f64 (/.f64 (sqrt.f64 8) x-scale) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) 2)) (*.f64 y-scale b)))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (sqrt.f64 8) x-scale) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2)) (*.f64 y-scale b)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 b (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2)))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))) 2))) (*.f64 x-scale (*.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 a 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) 2)) (*.f64 -8 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 b 2)))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale x-scale)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (sqrt.f64 8) x-scale) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) 2)) (*.f64 y-scale b)))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale))) (*.f64 4 (*.f64 (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)))))))))) (*.f64 2 (*.f64 (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale)))) 2)))))))) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 b b)))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 b y-scale) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (sqrt.f64 8) x-scale) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2)) (*.f64 y-scale b)))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) y-scale))) (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (/.f64 (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2)) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))))))))) (*.f64 2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b b))) (sqrt.f64 8)))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 -1/2 (*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 a (*.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (*.f64 b b)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)))) y-scale))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 -1/2 (*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))))) 2)))) y-scale))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 a (*.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (*.f64 b b)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 a 2) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 -8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale))) (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (*.f64 (pow.f64 b 2) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))) (pow.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 b 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))))) (*.f64 (pow.f64 a 3) (sqrt.f64 8))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/2 (*.f64 (/.f64 (*.f64 a (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b 2) (sqrt.f64 8)))))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) 2)))) y-scale))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 -8 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (*.f64 (*.f64 4 (/.f64 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))) 2)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b)))) (*.f64 y-scale x-scale))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b)) (-.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))) 2))))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale)))) 2)))))) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (/.f64 (*.f64 4 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 b 4))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (pow.f64 a 3))))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 -1/2 (*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (*.f64 b b))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2))))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 (*.f64 4 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))) 2))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))))) 2)))) y-scale))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))) (*.f64 (/.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))) (+.f64 (*.f64 -8 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))))) 2)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)))) y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))))) (*.f64 -2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 b 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)) (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 4 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))) (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))))) 2))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (pow.f64 (*.f64 2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b))))))) 2))))))))) x-scale) (/.f64 (*.f64 (sqrt.f64 8) (pow.f64 a 3)) y-scale))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 (*.f64 a (*.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (*.f64 b b)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))
(*.f64 (*.f64 -1/4 (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 -1/4 (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 -1/4 (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale x-scale)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) 2)) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale x-scale)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (*.f64 4 (/.f64 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (*.f64 y-scale x-scale)))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 a a)))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) 2)) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 8 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)))))) (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))))) (*.f64 -2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) 2)))))))) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 a a)))))))))
(*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))
(*.f64 (/.f64 (*.f64 1/4 a) (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 1/4 (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (/.f64 (*.f64 1/4 a) (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale x-scale)))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (*.f64 (*.f64 1/4 (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) 2)) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (*.f64 (/.f64 (*.f64 1/4 a) (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 4 (pow.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))))) 2)) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale a))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (+.f64 (*.f64 1/4 (*.f64 (/.f64 (*.f64 a (sqrt.f64 8)) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (*.f64 (-.f64 (*.f64 8 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (pow.f64 b 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale x-scale))) (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 -4 (/.f64 (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))) (*.f64 4 (pow.f64 (+.f64 (*.f64 -1 (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)) (*.f64 -1 (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 y-scale x-scale)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))) 2))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))) (sqrt.f64 8)) (*.f64 x-scale (*.f64 y-scale (pow.f64 a 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 1 (pow.f64 y-scale 2))) 2))))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale x-scale)))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (/.f64 (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (*.f64 -1/8 (*.f64 (/.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 8 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 b b))) y-scale))) (*.f64 4 (/.f64 (*.f64 (*.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (*.f64 y-scale x-scale)))))) (*.f64 2 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) x-scale) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 (*.f64 -2 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 a a))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))))))
(fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) 2)) (/.f64 (*.f64 x-scale (*.f64 y-scale a)) (sqrt.f64 8)))) (fma.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (+.f64 (*.f64 8 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b b)))))) (*.f64 4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2)))) x-scale)) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))))) (*.f64 -2 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale)))) (fma.f64 -4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2))))) (pow.f64 (*.f64 -4 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (pow.f64 (*.f64 -2 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 b y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (/.f64 (*.f64 y-scale x-scale) (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) 2)))))))) x-scale) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 a a)))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))))
(+.f64 (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (/.f64 y-scale (sqrt.f64 8)))) (*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (/.f64 y-scale (sqrt.f64 8)))) (*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))
(+.f64 (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (/.f64 y-scale (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (*.f64 x-scale x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) 2)))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (/.f64 y-scale (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2)))) y-scale)))))
(+.f64 (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 8)) y-scale))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 x-scale 2) y-scale)) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 4) (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))) (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) 2)) (sqrt.f64 8))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (/.f64 y-scale (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (pow.f64 x-scale 4) (/.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2)))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) 2)))))))))) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))) (/.f64 (*.f64 x-scale x-scale) (/.f64 y-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) 2))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (/.f64 y-scale (sqrt.f64 8)))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale)))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2)))) y-scale)) (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))) (/.f64 (pow.f64 x-scale 4) (/.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) 2)) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))) 2))))))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale)))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) 2))) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (-.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2)))))))))) (/.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2))))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (pow.f64 x-scale 7)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) 2))) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale)))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 3) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) (*.f64 -1/2 (/.f64 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale 7)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale)))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))
(*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) 2))) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 5) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 -2 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) 2))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 7) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 x-scale 3) y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))) 2))) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (-.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) 3) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2)))))))))) (/.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (neg.f64 (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2))))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (pow.f64 x-scale 7)) (/.f64 (sqrt.f64 8) y-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (*.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (pow.f64 x-scale 3)) (/.f64 (sqrt.f64 8) y-scale))) (*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))))
(fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2)) (pow.f64 x-scale 5)) (/.f64 (sqrt.f64 8) y-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))) 3) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))))))) (*.f64 -1/2 (/.f64 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2)) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale 7)) (/.f64 (sqrt.f64 8) y-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 (*.f64 -2 (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (/.f64 (*.f64 y-scale (pow.f64 x-scale 3)) (sqrt.f64 8)))) (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (fma.f64 2 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (*.f64 y-scale y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) 2)))))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8)))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (*.f64 y-scale y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)))))))))
(+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 (pow.f64 y-scale 2) x-scale)) (sqrt.f64 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 2) (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) 2)) (sqrt.f64 8))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 8)) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (pow.f64 y-scale 4) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 3))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) 2))) (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))) x-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 a 2) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 2 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (*.f64 y-scale y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) 2)))))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8)))) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 4) (sqrt.f64 8)) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (/.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 3) (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) 2)) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) x-scale)))))
(fma.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (*.f64 y-scale y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2)))))) (*.f64 -1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 x-scale (sqrt.f64 8)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale 4) (sqrt.f64 8)) (+.f64 (/.f64 (*.f64 -1/4 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2))) (/.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 3) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 -1/2 (/.f64 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) 2)) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))))) (pow.f64 (*.f64 1/2 (*.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) 2))) (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))) x-scale))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))
(*.f64 (/.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) y-scale)) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (/.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) y-scale)) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (/.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) y-scale)) x-scale) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 y-scale 7)) (/.f64 (sqrt.f64 8) x-scale)))))))
(fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 -1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))) (fma.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 (*.f64 -1/8 (/.f64 (-.f64 (/.f64 (*.f64 -1/4 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))
(*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale)))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale)))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))))))
(+.f64 (*.f64 1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 3) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 -1/4 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2)))) (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 7) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))) (*.f64 1/8 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 1/2 (/.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (pow.f64 a 2) (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 y-scale 5) x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (+.f64 (*.f64 -1/4 (*.f64 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)))) (*.f64 -1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))) (pow.f64 y-scale 7)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 b b))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale)))))))
(fma.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (pow.f64 y-scale 3)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 1/8 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)) (pow.f64 y-scale 5)) (/.f64 (sqrt.f64 8) x-scale))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (/.f64 (-.f64 (/.f64 (*.f64 -1/4 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) 2)) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (*.f64 1/2 (/.f64 (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) 2)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (pow.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) 2)) (/.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (*.f64 -2 (*.f64 (+.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))))) (/.f64 (*.f64 x-scale (pow.f64 y-scale 7)) (sqrt.f64 8))))))))
(*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2))))
(/.f64 (*.f64 -1/4 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 y-scale (*.f64 x-scale x-scale)))
(*.f64 -1/4 (/.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale x-scale))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 (pow.f64 angle 2) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2)))))
(fma.f64 -1/8 (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale b)) (*.f64 (sqrt.f64 8) (*.f64 angle angle)))) (/.f64 (*.f64 -1/4 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 y-scale (*.f64 x-scale x-scale))))
(fma.f64 -1/8 (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale b)) (*.f64 (sqrt.f64 8) (*.f64 angle angle)))) (*.f64 -1/4 (/.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale x-scale)))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 (pow.f64 angle 2) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2))))))
(fma.f64 -1/8 (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale b)) (*.f64 (sqrt.f64 8) (*.f64 angle angle)))) (fma.f64 -1/8 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 1/45 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))))) (fma.f64 1/45 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))))) (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) b))) 2))) (*.f64 y-scale b))) (/.f64 (*.f64 -1/4 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 y-scale (*.f64 x-scale x-scale)))))
(fma.f64 -1/8 (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale b)) (*.f64 (sqrt.f64 8) (*.f64 angle angle)))) (fma.f64 -1/8 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) 2) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (*.f64 1/45 (+.f64 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) b))) 2))) (*.f64 y-scale b))) (*.f64 -1/4 (/.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale x-scale))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 2/45 (/.f64 (*.f64 (+.f64 (*.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (+.f64 (*.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (*.f64 1/22674816000000 (*.f64 (pow.f64 (PI.f64) 5) (+.f64 a b))))) (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)))))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (+.f64 (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (PI.f64) (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (+.f64 a b) (PI.f64)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))) (*.f64 (pow.f64 angle 6) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (*.f64 (pow.f64 angle 2) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/2 (/.f64 (-.f64 (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (*.f64 1/45 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (+.f64 a b) (*.f64 (+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (*.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))))))) (pow.f64 (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (+.f64 (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (*.f64 2 (*.f64 (-.f64 (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (*.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 y-scale b)))) (*.f64 -1/4 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 y-scale (pow.f64 x-scale 2)))))))
(fma.f64 -1/8 (*.f64 (/.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (fma.f64 2/45 (*.f64 (/.f64 (fma.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (fma.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (*.f64 (*.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 x-scale x-scale))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) 2) (*.f64 y-scale y-scale))) (*.f64 (*.f64 2 (-.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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))))))) (*.f64 -1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) 2) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (*.f64 1/45 (+.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))))) (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b)))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))))) (*.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) (fma.f64 1/2 (/.f64 (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) 2) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (*.f64 1/45 (+.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))))) (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b)))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) b))) 2))) (*.f64 b b)))))) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (pow.f64 angle 6)) (*.f64 y-scale b))) (fma.f64 -1/8 (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale b)) (*.f64 (sqrt.f64 8) (*.f64 angle angle)))) (fma.f64 -1/8 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 1/45 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))))) (fma.f64 1/45 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 (*.f64 -1/11664000 (+.f64 a b)) (pow.f64 (PI.f64) 3))) (*.f64 (PI.f64) (+.f64 a b))))) (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) 2) (*.f64 (*.f64 2 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))))))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) b))) 2))) (*.f64 y-scale b))) (/.f64 (*.f64 -1/4 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (*.f64 y-scale (*.f64 x-scale x-scale))))))
(fma.f64 -1/8 (*.f64 (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (fma.f64 2/45 (*.f64 (/.f64 (fma.f64 1/2267481600000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (fma.f64 1/4534963200000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 5)) (*.f64 (*.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 x-scale x-scale))) (fma.f64 4 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2) (*.f64 y-scale y-scale))) (*.f64 2 (*.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 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 -1/2 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) 2) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (*.f64 1/45 (+.f64 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (/.f64 (*.f64 -1/2 (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) 2) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (*.f64 1/45 (+.f64 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) b))) 2)))))) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (pow.f64 angle 6)) (*.f64 y-scale b))) (fma.f64 -1/8 (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale b)) (*.f64 (sqrt.f64 8) (*.f64 angle angle)))) (fma.f64 -1/8 (*.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) (fma.f64 -1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (fma.f64 1/2 (/.f64 (+.f64 (pow.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) 2) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (*.f64 1/3149280000 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 4)))))) (*.f64 1/45 (+.f64 (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 -1/34992000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (*.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (*.f64 (PI.f64) (+.f64 a b))) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (fma.f64 1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)) (fma.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/2 (/.f64 (fma.f64 2 (*.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (*.f64 -1/32400 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) 2)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) b))) 2))) (*.f64 y-scale b))) (*.f64 -1/4 (/.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8)) (*.f64 y-scale (*.f64 x-scale x-scale)))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 (/.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) y-scale)) x-scale) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 (/.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) y-scale)) x-scale) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 (/.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) y-scale)) x-scale) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 (/.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) y-scale)) x-scale) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 (/.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) y-scale)) x-scale) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 (/.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) y-scale)) x-scale) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 (/.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) y-scale)) x-scale) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))
(*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) 2) (*.f64 4 (/.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))))
(*.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (pow.f64 (+.f64 a b) 2))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 (/.f64 (*.f64 -1/4 (/.f64 (sqrt.f64 8) y-scale)) x-scale) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))) 2) (/.f64 (*.f64 4 (pow.f64 (-.f64 b a) 2)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))))))))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) 1)
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(neg.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(log.f64 (exp.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(cbrt.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(cbrt.f64 (*.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))))))
(cbrt.f64 (*.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2))) (/.f64 (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)))))))
(expm1.f64 (log1p.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(exp.f64 (log.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(log1p.f64 (expm1.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))
(*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(*.f64 1 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (/.f64 1 (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (/.f64 (/.f64 1 a) (*.f64 (*.f64 b b) (*.f64 a -4))))
(*.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (/.f64 1 (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))
(*.f64 (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (sqrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(*.f64 (*.f64 (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))) (cbrt.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) 1)
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(log.f64 (exp.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(cbrt.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))))
(cbrt.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))))))
(expm1.f64 (log1p.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(exp.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))
(log1p.f64 (expm1.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 a (*.f64 a (*.f64 b b)))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b))))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 a b))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4)))))

eval7.2s (5.2%)

Compiler

Compiled 352303 to 215475 computations (38.8% saved)

prune1.2s (0.9%)

Pruning

106 alts after pruning (105 fresh and 1 done)

PrunedKeptTotal
New1224801304
Fresh282553
Picked101
Done314
Total12561061362
Accurracy
62.1%
Counts
1362 → 106
Alt Table
Click to see full alt table
StatusAccuracyProgram
2.1%
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (*.f64 (*.f64 y-scale (pow.f64 x-scale 4)) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (pow.f64 x-scale 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) 2))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))))
2.1%
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) 1/2) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (pow.f64 x-scale 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) 2))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))
3.3%
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2)))))))))
9.8%
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3) 1/3)
17.9%
(pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) y-scale))) 2)
18.4%
(pow.f64 (cbrt.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 3)
8.9%
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
12.1%
(/.f64 (expm1.f64 (*.f64 (log1p.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))
2.6%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale))))
2.2%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))
5.1%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))))))
3.4%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (neg.f64 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))))
5.1%
(*.f64 (/.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 y-scale (*.f64 x-scale x-scale))) (pow.f64 (*.f64 x-scale y-scale) 2))
1.3%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (*.f64 1 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
1.2%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) 1) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
1.2%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
4.1%
(*.f64 (*.f64 (*.f64 -1/4 (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
1.3%
(*.f64 (*.f64 (*.f64 -1/4 (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
6.5%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
4.9%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
4.8%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
6.1%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
15.9%
(*.f64 (*.f64 1/4 (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))
6.6%
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
2.4%
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))
6.1%
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
11.8%
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))
11.8%
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
15.9%
(*.f64 (*.f64 1/4 (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))
18.6%
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
5.4%
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3))
7.4%
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 2))
18.4%
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 3))
7.5%
(*.f64 (*.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1))
18.4%
(*.f64 (*.f64 1/4 y-scale) (*.f64 (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) b)) 3) (sqrt.f64 2)))
18.6%
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
11.1%
(*.f64 (*.f64 1/4 y-scale) (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 8))) (sqrt.f64 2)))
14.3%
(*.f64 (*.f64 1/4 y-scale) (*.f64 (fabs.f64 (*.f64 (sqrt.f64 8) b)) (sqrt.f64 2)))
7.1%
(*.f64 (*.f64 1/4 y-scale) (*.f64 (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) b))) (sqrt.f64 2)))
11.1%
(*.f64 (*.f64 1/4 y-scale) (*.f64 (cbrt.f64 (*.f64 (pow.f64 b 3) (*.f64 8 (sqrt.f64 8)))) (sqrt.f64 2)))
7.2%
(*.f64 (*.f64 1/4 y-scale) (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))))
11.1%
(*.f64 (*.f64 1/4 y-scale) (cbrt.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3) (*.f64 2 (sqrt.f64 2)))))
4.1%
(*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
1.2%
(*.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
4.3%
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
3.2%
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))
4.2%
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
18.5%
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
0.9%
(*.f64 (exp.f64 (log.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (pow.f64 (*.f64 x-scale y-scale) 2))
18.5%
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
4.9%
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))
11.8%
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))
8.7%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))
11.6%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (sqrt.f64 2) y-scale))))
11.0%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
8.7%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
3.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
3.4%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))))))))
5.4%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))))))))
3.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (log1p.f64 (expm1.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
3.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (expm1.f64 (log1p.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
2.6%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
18.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
11.2%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
6.2%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
8.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) b) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))))
9.1%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) b) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))))
8.2%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 (sqrt.f64 2) a (/.f64 (*.f64 (*.f64 1/2 (*.f64 (*.f64 angle angle) (sqrt.f64 2))) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 b b) 1/32400) (*.f64 (*.f64 a a) -1/32400)))) a)))))
13.0%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 3/2) 1/3))))
17.0%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/4) 2))))
16.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (pow.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) 3))))
8.7%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) b) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) -1/2) (*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b))))))
7.5%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
14.1%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
9.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) b) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
17.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
22.1%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))))
10.3%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
10.0%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
14.0%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
14.3%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a))))
10.1%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b)))))
13.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
9.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
17.8%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
15.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 4))) (fabs.f64 (cbrt.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))))
9.6%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2))))))
13.5%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
11.6%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (sqrt.f64 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 4)))))))
16.2%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (exp.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))))))
17.8%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
9.7%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
16.2%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (exp.f64 (*.f64 (log.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1/2)))))
13.6%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (cbrt.f64 (pow.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)) 3/2)))))
3.4%
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
3.4%
(*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
3.7%
(*.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
17.9%
(sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 8))) 2) 1/8))
11.6%
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
17.8%
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (*.f64 (*.f64 1/4 y-scale) b) (sqrt.f64 8)) 2)))
5.6%
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))))
27.9%
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
27.5%
(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
1.1%
(expm1.f64 (log1p.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
17.8%
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
17.1%
(exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
Compiler

Compiled 18456 to 12366 computations (33% saved)

localize24.0ms (0%)

Local Accuracy

Found 3 expressions with local accuracy:

NewAccuracyProgram
99.7%
(*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))
99.5%
(*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))
99.3%
(*.f64 b (sqrt.f64 2))
Compiler

Compiled 52 to 42 computations (19.2% saved)

series29.0ms (0%)

Counts
3 → 60
Calls

15 calls:

TimeVariablePointExpression
25.0ms
y-scale
@0
(*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))
1.0ms
b
@inf
(*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))
0.0ms
b
@0
(*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))
0.0ms
y-scale
@inf
(*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))
0.0ms
b
@0
(*.f64 b (sqrt.f64 2))

rewrite112.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1198×sqrt-prod
998×unswap-sqr
878×swap-sqr
460×sqr-pow
428×pow-sqr
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01467
128167
2313967
Stop Event
node limit
Counts
3 → 54
Calls
Call 1
Inputs
(*.f64 b (sqrt.f64 2))
(*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))
(*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))
Outputs
(((+.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((pow.f64 (*.f64 b (sqrt.f64 2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((pow.f64 (sqrt.f64 (*.f64 b (sqrt.f64 2))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((pow.f64 (cbrt.f64 (*.f64 b (sqrt.f64 2))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((pow.f64 (pow.f64 (*.f64 b (sqrt.f64 2)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((sqrt.f64 (*.f64 2 (*.f64 b b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((fabs.f64 (*.f64 b (sqrt.f64 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((log.f64 (pow.f64 (exp.f64 (sqrt.f64 2)) b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 b (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((cbrt.f64 (pow.f64 (*.f64 b (sqrt.f64 2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((cbrt.f64 (*.f64 (pow.f64 b 3) (*.f64 2 (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((cbrt.f64 (*.f64 (*.f64 2 (sqrt.f64 2)) (pow.f64 b 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((expm1.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((exp.f64 (log.f64 (*.f64 b (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((log1p.f64 (expm1.f64 (*.f64 b (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)))
(((+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((pow.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((pow.f64 (pow.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((sqrt.f64 (*.f64 8 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((fabs.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 3) (*.f64 8 (sqrt.f64 8)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((exp.f64 (log.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)))
(((+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 2))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((sqrt.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((fabs.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 y-scale) 1/4) (*.f64 b (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((cbrt.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 b (sqrt.f64 2)) 3) (pow.f64 (*.f64 1/4 y-scale) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 1/4 y-scale) 3) (pow.f64 (*.f64 b (sqrt.f64 2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((expm1.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((exp.f64 (log.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)) ((log1p.f64 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) #f)))

simplify126.0ms (0.1%)

Algorithm
egg-herbie
Rules
1254×unswap-sqr
1034×*-commutative
856×distribute-lft-in
828×distribute-rgt-in
618×times-frac
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
01563078
14163002
216772984
379622984
Stop Event
node limit
Counts
114 → 71
Calls
Call 1
Inputs
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(+.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) 1)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) 1))))
(pow.f64 (*.f64 b (sqrt.f64 2)) 1)
(pow.f64 (sqrt.f64 (*.f64 b (sqrt.f64 2))) 2)
(pow.f64 (cbrt.f64 (*.f64 b (sqrt.f64 2))) 3)
(pow.f64 (pow.f64 (*.f64 b (sqrt.f64 2)) 3) 1/3)
(sqrt.f64 (*.f64 2 (*.f64 b b)))
(fabs.f64 (*.f64 b (sqrt.f64 2)))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 2)) b))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (sqrt.f64 2)))))
(cbrt.f64 (pow.f64 (*.f64 b (sqrt.f64 2)) 3))
(cbrt.f64 (*.f64 (pow.f64 b 3) (*.f64 2 (sqrt.f64 2))))
(cbrt.f64 (*.f64 (*.f64 2 (sqrt.f64 2)) (pow.f64 b 3)))
(expm1.f64 (log1p.f64 (*.f64 b (sqrt.f64 2))))
(exp.f64 (log.f64 (*.f64 b (sqrt.f64 2))))
(log1p.f64 (expm1.f64 (*.f64 b (sqrt.f64 2))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) 1)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) 1))))
(pow.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))) 1)
(pow.f64 (sqrt.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))) 2)
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))) 3)
(pow.f64 (pow.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))) 3) 1/3)
(sqrt.f64 (*.f64 8 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 2)))
(fabs.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))))
(cbrt.f64 (pow.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))) 3))
(cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 3)))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 3) (*.f64 8 (sqrt.f64 8))))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))))
(exp.f64 (log.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))))
(log1p.f64 (expm1.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) 1)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) 1))))
(pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 1)
(pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 2))))) 2)
(pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))) 3)
(pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 2))
(fabs.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))
(log.f64 (pow.f64 (pow.f64 (exp.f64 y-scale) 1/4) (*.f64 b (sqrt.f64 2))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))))
(cbrt.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 3))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (sqrt.f64 2)) 3) (pow.f64 (*.f64 1/4 y-scale) 3)))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 1/4 y-scale) 3) (pow.f64 (*.f64 b (sqrt.f64 2)) 3)))
(expm1.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))
(exp.f64 (log.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))
(log1p.f64 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))
Outputs
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 (sqrt.f64 2) b)
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(+.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) -1)
(*.f64 (sqrt.f64 2) b)
(-.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) 1)
(*.f64 (sqrt.f64 2) b)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) 1))
(*.f64 (sqrt.f64 2) b)
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 2)))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) b))) 3) -1) (fma.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) b))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) b))) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) b))) 1)))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) b))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) b))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) b)))))))
(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 (sqrt.f64 2) b)))) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) b))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 (sqrt.f64 2) b))))))
(pow.f64 (*.f64 b (sqrt.f64 2)) 1)
(*.f64 (sqrt.f64 2) b)
(pow.f64 (sqrt.f64 (*.f64 b (sqrt.f64 2))) 2)
(*.f64 (sqrt.f64 2) b)
(pow.f64 (cbrt.f64 (*.f64 b (sqrt.f64 2))) 3)
(*.f64 (sqrt.f64 2) b)
(pow.f64 (pow.f64 (*.f64 b (sqrt.f64 2)) 3) 1/3)
(*.f64 (sqrt.f64 2) b)
(sqrt.f64 (*.f64 2 (*.f64 b b)))
(fabs.f64 (*.f64 b (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) b)
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 2)) b))
(*.f64 (sqrt.f64 2) b)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (sqrt.f64 2)))))
(*.f64 (sqrt.f64 2) b)
(cbrt.f64 (pow.f64 (*.f64 b (sqrt.f64 2)) 3))
(*.f64 (sqrt.f64 2) b)
(cbrt.f64 (*.f64 (pow.f64 b 3) (*.f64 2 (sqrt.f64 2))))
(*.f64 (sqrt.f64 2) b)
(cbrt.f64 (*.f64 (*.f64 2 (sqrt.f64 2)) (pow.f64 b 3)))
(*.f64 (sqrt.f64 2) b)
(expm1.f64 (log1p.f64 (*.f64 b (sqrt.f64 2))))
(*.f64 (sqrt.f64 2) b)
(exp.f64 (log.f64 (*.f64 b (sqrt.f64 2))))
(*.f64 (sqrt.f64 2) b)
(log1p.f64 (expm1.f64 (*.f64 b (sqrt.f64 2))))
(*.f64 (sqrt.f64 2) b)
(+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) -1)
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) 1)
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) 1))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))) 3) -1) (+.f64 (exp.f64 (+.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))) (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))))) (+.f64 1 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8))))))) 3)) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))))))))
(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))))))
(pow.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))) 1)
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(pow.f64 (sqrt.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))) 2)
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))) 3)
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(pow.f64 (pow.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))) 3) 1/3)
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(sqrt.f64 (*.f64 8 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 2)))
(sqrt.f64 (*.f64 8 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale))) 2)))
(fabs.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(cbrt.f64 (pow.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8))) 3))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 3)))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 3) (*.f64 8 (sqrt.f64 8))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(exp.f64 (log.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(log1p.f64 (expm1.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(*.f64 b (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) -1)
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) 1)
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) 1))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))) 3) -1) (+.f64 (exp.f64 (+.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))) (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))) (+.f64 1 (exp.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale))))) 3)) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale))))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))))))))
(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale))))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale))))))))
(pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 1)
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 2))))) 2)
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))) 3)
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 3) 1/3)
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(sqrt.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 2))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(fabs.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(log.f64 (pow.f64 (pow.f64 (exp.f64 y-scale) 1/4) (*.f64 b (sqrt.f64 2))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(cbrt.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))) 3))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (sqrt.f64 2)) 3) (pow.f64 (*.f64 1/4 y-scale) 3)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 1/4 y-scale) 3) (pow.f64 (*.f64 b (sqrt.f64 2)) 3)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(expm1.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(exp.f64 (log.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))
(log1p.f64 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) b)))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))

localize17.0ms (0%)

Local Accuracy

Found 3 expressions with local accuracy:

NewAccuracyProgram
100.0%
(*.f64 (*.f64 b b) 16)
99.7%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
60.0%
(sqrt.f64 (*.f64 (*.f64 b b) 16))
Compiler

Compiled 41 to 23 computations (43.9% saved)

series3.0ms (0%)

Counts
3 → 48
Calls

12 calls:

TimeVariablePointExpression
0.0ms
y-scale
@0
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
0.0ms
b
@0
(*.f64 (*.f64 b b) 16)
0.0ms
b
@inf
(sqrt.f64 (*.f64 (*.f64 b b) 16))
0.0ms
b
@inf
(*.f64 (*.f64 b b) 16)
0.0ms
b
@inf
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))

rewrite120.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1056×*-commutative
932×sqrt-prod
712×unswap-sqr
670×swap-sqr
408×sqr-pow
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
01259
124339
2279339
Stop Event
node limit
Counts
3 → 89
Calls
Call 1
Inputs
(sqrt.f64 (*.f64 (*.f64 b b) 16))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
(*.f64 (*.f64 b b) 16)
Outputs
(((+.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 b 4) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 b (pow.f64 16 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 b (fabs.f64 (pow.f64 16 1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 b (pow.f64 (cbrt.f64 4) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (*.f64 b 4) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (*.f64 b 4) (pow.f64 1 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 1 (*.f64 b 4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (*.f64 (sqrt.f64 b) 2) (*.f64 (sqrt.f64 b) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 4 b) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (sqrt.f64 b) (*.f64 4 (sqrt.f64 b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (sqrt.f64 b) (sqrt.f64 (*.f64 (*.f64 b 4) 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (cbrt.f64 (*.f64 b 4)) (cbrt.f64 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) (cbrt.f64 (*.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (pow.f64 (cbrt.f64 b) 2) (sqrt.f64 (*.f64 16 (pow.f64 (cbrt.f64 b) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (cbrt.f64 b) (sqrt.f64 (*.f64 (cbrt.f64 b) (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (pow.f64 b 1/4) (sqrt.f64 (*.f64 (sqrt.f64 b) (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (*.f64 4 (sqrt.f64 b)) (sqrt.f64 b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (pow.f64 (*.f64 b 4) 1/4) (sqrt.f64 (pow.f64 (*.f64 b 4) 3/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (pow.f64 16 1/2) b) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (pow.f64 1 1/2) (*.f64 b 4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (fabs.f64 (pow.f64 16 1/2)) b) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (fabs.f64 (pow.f64 1 1/2)) (*.f64 b 4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (sqrt.f64 (pow.f64 (*.f64 b 4) 3/2)) (pow.f64 (*.f64 b 4) 1/4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (sqrt.f64 (*.f64 16 (pow.f64 (cbrt.f64 b) 4))) (cbrt.f64 b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b (*.f64 b 16))))) (pow.f64 (*.f64 b 4) 1/6)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3) (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 b (*.f64 b 16)))) 3) (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 b 4))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (pow.f64 (*.f64 (cbrt.f64 (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (cbrt.f64 (*.f64 b 4)))) 3) (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 b 4))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 b) 2)) 3) (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 b) 2)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) (exp.f64 (log1p.f64 (*.f64 b 4)))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) (exp.f64 (log1p.f64 (*.f64 b 4)))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 b (*.f64 b 16)) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 b 4) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 (sqrt.f64 b) 2) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (cbrt.f64 (*.f64 b 4)) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 (pow.f64 b 3) 64) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 (pow.f64 b 4) 256) 1/4) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((fabs.f64 (*.f64 b 4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((fabs.f64 (-.f64 1 (exp.f64 (log1p.f64 (*.f64 b 4))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((fabs.f64 (neg.f64 (*.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((log.f64 (pow.f64 (exp.f64 b) 4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 b 4)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((cbrt.f64 (*.f64 (pow.f64 b 3) 64)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((expm1.f64 (log1p.f64 (*.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((exp.f64 (log.f64 (*.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((log1p.f64 (expm1.f64 (*.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)))
(((+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((fabs.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((log.f64 (pow.f64 (pow.f64 (pow.f64 (exp.f64 b) 4) y-scale) 1/4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((expm1.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((log1p.f64 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)))
(((+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 b (*.f64 b 16)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 b 4) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 (sqrt.f64 b) 2) 4) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (cbrt.f64 (*.f64 b 4)) 6) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 (pow.f64 b 3) 64) 2/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 (pow.f64 b 4) 256) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((sqrt.f64 (*.f64 (pow.f64 b 4) 256)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((fabs.f64 (*.f64 b (*.f64 b 16))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 b) b) 16)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((cbrt.f64 (*.f64 (pow.f64 b 6) 4096)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((expm1.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 b 4)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)) ((log1p.f64 (expm1.f64 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 (*.f64 b b) 16)) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))) (*.f64 (*.f64 b b) 16)) #f)))

simplify132.0ms (0.1%)

Algorithm
egg-herbie
Rules
1556×unswap-sqr
726×times-frac
632×distribute-rgt-in
626×distribute-lft-in
510×associate-/l*
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
02241921
15671837
218951811
377471811
Stop Event
node limit
Counts
137 → 119
Calls
Call 1
Inputs
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(*.f64 -4 b)
(*.f64 -4 b)
(*.f64 -4 b)
(*.f64 -4 b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 y-scale b)
(*.f64 -1 (*.f64 y-scale b))
(*.f64 -1 (*.f64 y-scale b))
(*.f64 -1 (*.f64 y-scale b))
(*.f64 -1 (*.f64 y-scale b))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(+.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)
(*.f64 b 4)
(*.f64 b (pow.f64 16 1/2))
(*.f64 b (fabs.f64 (pow.f64 16 1/2)))
(*.f64 b (pow.f64 (cbrt.f64 4) 3))
(*.f64 (*.f64 b 4) 1)
(*.f64 (*.f64 b 4) (pow.f64 1 1/2))
(*.f64 1 (*.f64 b 4))
(*.f64 (*.f64 (sqrt.f64 b) 2) (*.f64 (sqrt.f64 b) 2))
(*.f64 4 b)
(*.f64 (sqrt.f64 b) (*.f64 4 (sqrt.f64 b)))
(*.f64 (sqrt.f64 b) (sqrt.f64 (*.f64 (*.f64 b 4) 4)))
(*.f64 (cbrt.f64 (*.f64 b 4)) (cbrt.f64 (*.f64 b (*.f64 b 16))))
(*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4)))))
(*.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) (cbrt.f64 (*.f64 b 4)))
(*.f64 (pow.f64 (cbrt.f64 b) 2) (sqrt.f64 (*.f64 16 (pow.f64 (cbrt.f64 b) 2))))
(*.f64 (cbrt.f64 b) (sqrt.f64 (*.f64 (cbrt.f64 b) (*.f64 b 16))))
(*.f64 (pow.f64 b 1/4) (sqrt.f64 (*.f64 (sqrt.f64 b) (*.f64 b 16))))
(*.f64 (*.f64 4 (sqrt.f64 b)) (sqrt.f64 b))
(*.f64 (pow.f64 (*.f64 b 4) 1/4) (sqrt.f64 (pow.f64 (*.f64 b 4) 3/2)))
(*.f64 (pow.f64 16 1/2) b)
(*.f64 (pow.f64 1 1/2) (*.f64 b 4))
(*.f64 (fabs.f64 (pow.f64 16 1/2)) b)
(*.f64 (fabs.f64 (pow.f64 1 1/2)) (*.f64 b 4))
(*.f64 (sqrt.f64 (pow.f64 (*.f64 b 4) 3/2)) (pow.f64 (*.f64 b 4) 1/4))
(*.f64 (sqrt.f64 (*.f64 16 (pow.f64 (cbrt.f64 b) 4))) (cbrt.f64 b))
(*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)
(*.f64 (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b (*.f64 b 16))))) (pow.f64 (*.f64 b 4) 1/6))
(*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3) (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3))
(*.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 b (*.f64 b 16)))) 3) (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 b 4))) 3))
(*.f64 (pow.f64 (*.f64 (cbrt.f64 (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (cbrt.f64 (*.f64 b 4)))) 3) (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 b 4))) 3))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 b) 2)) 3) (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 b) 2)) 3))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) (exp.f64 (log1p.f64 (*.f64 b 4)))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) (exp.f64 (log1p.f64 (*.f64 b 4)))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1))))
(pow.f64 (*.f64 b (*.f64 b 16)) 1/2)
(pow.f64 (*.f64 b 4) 1)
(pow.f64 (*.f64 (sqrt.f64 b) 2) 2)
(pow.f64 (cbrt.f64 (*.f64 b 4)) 3)
(pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2)
(pow.f64 (*.f64 (pow.f64 b 3) 64) 1/3)
(pow.f64 (*.f64 (pow.f64 b 4) 256) 1/4)
(pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)
(fabs.f64 (*.f64 b 4))
(fabs.f64 (-.f64 1 (exp.f64 (log1p.f64 (*.f64 b 4)))))
(fabs.f64 (neg.f64 (*.f64 b 4)))
(log.f64 (pow.f64 (exp.f64 b) 4))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b 4))))
(cbrt.f64 (*.f64 (pow.f64 b 3) 64))
(expm1.f64 (log1p.f64 (*.f64 b 4)))
(exp.f64 (log.f64 (*.f64 b 4)))
(log1p.f64 (expm1.f64 (*.f64 b 4)))
(+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) 1)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) 1))))
(pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 1)
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
(pow.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2) 1/2)
(pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3)
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
(fabs.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))
(log.f64 (pow.f64 (pow.f64 (pow.f64 (exp.f64 b) 4) y-scale) 1/4))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(log1p.f64 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
(pow.f64 (*.f64 b (*.f64 b 16)) 1)
(pow.f64 (*.f64 b 4) 2)
(pow.f64 (*.f64 (sqrt.f64 b) 2) 4)
(pow.f64 (cbrt.f64 (*.f64 b 4)) 6)
(pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3)
(pow.f64 (*.f64 (pow.f64 b 3) 64) 2/3)
(pow.f64 (*.f64 (pow.f64 b 4) 256) 1/2)
(pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/3)
(sqrt.f64 (*.f64 (pow.f64 b 4) 256))
(fabs.f64 (*.f64 b (*.f64 b 16)))
(log.f64 (pow.f64 (pow.f64 (exp.f64 b) b) 16))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 b 16)))))
(cbrt.f64 (*.f64 (pow.f64 b 6) 4096))
(expm1.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))
(exp.f64 (*.f64 (log.f64 (*.f64 b 4)) 2))
(log1p.f64 (expm1.f64 (*.f64 b (*.f64 b 16))))
Outputs
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(*.f64 -4 b)
(*.f64 b -4)
(*.f64 -4 b)
(*.f64 b -4)
(*.f64 -4 b)
(*.f64 b -4)
(*.f64 -4 b)
(*.f64 b -4)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 y-scale b)
(*.f64 b y-scale)
(*.f64 -1 (*.f64 y-scale b))
(neg.f64 (*.f64 b y-scale))
(*.f64 b (neg.f64 y-scale))
(*.f64 -1 (*.f64 y-scale b))
(neg.f64 (*.f64 b y-scale))
(*.f64 b (neg.f64 y-scale))
(*.f64 -1 (*.f64 y-scale b))
(neg.f64 (*.f64 b y-scale))
(*.f64 b (neg.f64 y-scale))
(*.f64 -1 (*.f64 y-scale b))
(neg.f64 (*.f64 b y-scale))
(*.f64 b (neg.f64 y-scale))
(*.f64 16 (pow.f64 b 2))
(*.f64 b (*.f64 b 16))
(*.f64 16 (pow.f64 b 2))
(*.f64 b (*.f64 b 16))
(*.f64 16 (pow.f64 b 2))
(*.f64 b (*.f64 b 16))
(*.f64 16 (pow.f64 b 2))
(*.f64 b (*.f64 b 16))
(*.f64 16 (pow.f64 b 2))
(*.f64 b (*.f64 b 16))
(*.f64 16 (pow.f64 b 2))
(*.f64 b (*.f64 b 16))
(*.f64 16 (pow.f64 b 2))
(*.f64 b (*.f64 b 16))
(*.f64 16 (pow.f64 b 2))
(*.f64 b (*.f64 b 16))
(*.f64 16 (pow.f64 b 2))
(*.f64 b (*.f64 b 16))
(*.f64 16 (pow.f64 b 2))
(*.f64 b (*.f64 b 16))
(*.f64 16 (pow.f64 b 2))
(*.f64 b (*.f64 b 16))
(*.f64 16 (pow.f64 b 2))
(*.f64 b (*.f64 b 16))
(+.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) -1)
(*.f64 4 b)
(-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)
(*.f64 4 b)
(*.f64 b 4)
(*.f64 4 b)
(*.f64 b (pow.f64 16 1/2))
(*.f64 4 b)
(*.f64 b (fabs.f64 (pow.f64 16 1/2)))
(*.f64 4 b)
(*.f64 b (pow.f64 (cbrt.f64 4) 3))
(*.f64 4 b)
(*.f64 (*.f64 b 4) 1)
(*.f64 4 b)
(*.f64 (*.f64 b 4) (pow.f64 1 1/2))
(*.f64 4 b)
(*.f64 1 (*.f64 b 4))
(*.f64 4 b)
(*.f64 (*.f64 (sqrt.f64 b) 2) (*.f64 (sqrt.f64 b) 2))
(*.f64 4 b)
(*.f64 4 b)
(*.f64 (sqrt.f64 b) (*.f64 4 (sqrt.f64 b)))
(*.f64 4 b)
(*.f64 (sqrt.f64 b) (sqrt.f64 (*.f64 (*.f64 b 4) 4)))
(*.f64 (sqrt.f64 b) (sqrt.f64 (*.f64 b 16)))
(*.f64 (cbrt.f64 (*.f64 b 4)) (cbrt.f64 (*.f64 b (*.f64 b 16))))
(*.f64 (cbrt.f64 (*.f64 4 b)) (cbrt.f64 (*.f64 b (*.f64 b 16))))
(*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4)))))
(*.f64 4 b)
(*.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) (cbrt.f64 (*.f64 b 4)))
(*.f64 (cbrt.f64 (*.f64 4 b)) (cbrt.f64 (*.f64 b (*.f64 b 16))))
(*.f64 (pow.f64 (cbrt.f64 b) 2) (sqrt.f64 (*.f64 16 (pow.f64 (cbrt.f64 b) 2))))
(*.f64 (cbrt.f64 b) (sqrt.f64 (*.f64 (cbrt.f64 b) (*.f64 b 16))))
(*.f64 (cbrt.f64 b) (sqrt.f64 (*.f64 (*.f64 b 16) (cbrt.f64 b))))
(*.f64 (pow.f64 b 1/4) (sqrt.f64 (*.f64 (sqrt.f64 b) (*.f64 b 16))))
(*.f64 (pow.f64 b 1/4) (sqrt.f64 (*.f64 b (*.f64 16 (sqrt.f64 b)))))
(*.f64 (*.f64 4 (sqrt.f64 b)) (sqrt.f64 b))
(*.f64 4 b)
(*.f64 (pow.f64 (*.f64 b 4) 1/4) (sqrt.f64 (pow.f64 (*.f64 b 4) 3/2)))
(*.f64 (pow.f64 (*.f64 4 b) 1/4) (sqrt.f64 (pow.f64 (*.f64 4 b) 3/2)))
(*.f64 (pow.f64 (*.f64 4 b) 1/4) (pow.f64 (*.f64 4 b) 3/4))
(*.f64 (pow.f64 16 1/2) b)
(*.f64 4 b)
(*.f64 (pow.f64 1 1/2) (*.f64 b 4))
(*.f64 4 b)
(*.f64 (fabs.f64 (pow.f64 16 1/2)) b)
(*.f64 4 b)
(*.f64 (fabs.f64 (pow.f64 1 1/2)) (*.f64 b 4))
(*.f64 4 b)
(*.f64 (sqrt.f64 (pow.f64 (*.f64 b 4) 3/2)) (pow.f64 (*.f64 b 4) 1/4))
(*.f64 (pow.f64 (*.f64 4 b) 1/4) (sqrt.f64 (pow.f64 (*.f64 4 b) 3/2)))
(*.f64 (pow.f64 (*.f64 4 b) 1/4) (pow.f64 (*.f64 4 b) 3/4))
(*.f64 (sqrt.f64 (*.f64 16 (pow.f64 (cbrt.f64 b) 4))) (cbrt.f64 b))
(*.f64 (cbrt.f64 b) (sqrt.f64 (*.f64 (*.f64 b 16) (cbrt.f64 b))))
(*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)
(*.f64 2 (sqrt.f64 (*.f64 b (*.f64 4 b))))
(*.f64 2 (sqrt.f64 (*.f64 4 (*.f64 b b))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b (*.f64 b 16))))) (pow.f64 (*.f64 b 4) 1/6))
(*.f64 (sqrt.f64 (*.f64 (*.f64 4 b) (cbrt.f64 (*.f64 b (*.f64 b 16))))) (pow.f64 (*.f64 4 b) 1/6))
(*.f64 (sqrt.f64 (*.f64 b (*.f64 4 (cbrt.f64 (*.f64 b (*.f64 b 16)))))) (pow.f64 (*.f64 4 b) 1/6))
(*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3) (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3))
(*.f64 4 b)
(*.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 b (*.f64 b 16)))) 3) (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 b 4))) 3))
(*.f64 (cbrt.f64 (*.f64 4 b)) (cbrt.f64 (*.f64 b (*.f64 b 16))))
(*.f64 (pow.f64 (*.f64 (cbrt.f64 (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (cbrt.f64 (*.f64 b 4)))) 3) (pow.f64 (cbrt.f64 (cbrt.f64 (*.f64 b 4))) 3))
(*.f64 4 b)
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 b) 2)) 3) (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 b) 2)) 3))
(*.f64 4 b)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) (exp.f64 (log1p.f64 (*.f64 b 4)))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1))
(*.f64 4 b)
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) (exp.f64 (log1p.f64 (*.f64 b 4)))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 b))) 3) -1) (+.f64 (exp.f64 (+.f64 (log1p.f64 (*.f64 4 b)) (log1p.f64 (*.f64 4 b)))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 b))) 1)))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 b))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 b))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 4 b)))))))
(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 b)))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 b))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 4 b))))))
(pow.f64 (*.f64 b (*.f64 b 16)) 1/2)
(*.f64 4 b)
(pow.f64 (*.f64 b 4) 1)
(*.f64 4 b)
(pow.f64 (*.f64 (sqrt.f64 b) 2) 2)
(*.f64 4 b)
(pow.f64 (cbrt.f64 (*.f64 b 4)) 3)
(*.f64 4 b)
(pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2)
(*.f64 4 b)
(pow.f64 (*.f64 (pow.f64 b 3) 64) 1/3)
(cbrt.f64 (*.f64 (pow.f64 b 3) 64))
(pow.f64 (*.f64 (pow.f64 b 4) 256) 1/4)
(pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)
(fabs.f64 (*.f64 b 4))
(*.f64 4 b)
(fabs.f64 (-.f64 1 (exp.f64 (log1p.f64 (*.f64 b 4)))))
(*.f64 4 b)
(fabs.f64 (neg.f64 (*.f64 b 4)))
(*.f64 4 b)
(log.f64 (pow.f64 (exp.f64 b) 4))
(*.f64 4 b)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b 4))))
(*.f64 4 b)
(cbrt.f64 (*.f64 (pow.f64 b 3) 64))
(expm1.f64 (log1p.f64 (*.f64 b 4)))
(*.f64 4 b)
(exp.f64 (log.f64 (*.f64 b 4)))
(*.f64 4 b)
(log1p.f64 (expm1.f64 (*.f64 b 4)))
(*.f64 4 b)
(+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) -1)
(*.f64 b y-scale)
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) 1)
(*.f64 b y-scale)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) 1))
(*.f64 b y-scale)
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 4 (*.f64 y-scale 1/4))))) 3) -1) (+.f64 (exp.f64 (+.f64 (log1p.f64 (*.f64 b (*.f64 4 (*.f64 y-scale 1/4)))) (log1p.f64 (*.f64 b (*.f64 4 (*.f64 y-scale 1/4)))))) (+.f64 1 (exp.f64 (log1p.f64 (*.f64 b (*.f64 4 (*.f64 y-scale 1/4))))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b y-scale))) 3)) (+.f64 (+.f64 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 b y-scale)))) (exp.f64 (log1p.f64 (*.f64 b y-scale)))) 1))
(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 b y-scale)))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 b y-scale))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b y-scale))))))
(pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 1)
(*.f64 b y-scale)
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
(*.f64 b y-scale)
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
(*.f64 b y-scale)
(pow.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2) 1/2)
(*.f64 b y-scale)
(pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3)
(cbrt.f64 (*.f64 64 (pow.f64 (*.f64 b (*.f64 y-scale 1/4)) 3)))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
(*.f64 b y-scale)
(fabs.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))
(*.f64 b y-scale)
(log.f64 (pow.f64 (pow.f64 (pow.f64 (exp.f64 b) 4) y-scale) 1/4))
(*.f64 b y-scale)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
(*.f64 b y-scale)
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
(cbrt.f64 (*.f64 64 (pow.f64 (*.f64 b (*.f64 y-scale 1/4)) 3)))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 b y-scale)
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 b y-scale)
(log1p.f64 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 b y-scale)
(+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) -1)
(*.f64 b (*.f64 b 16))
(-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)
(*.f64 b (*.f64 b 16))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))
(*.f64 b (*.f64 b 16))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3) -1) (+.f64 (exp.f64 (+.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) (log1p.f64 (*.f64 b (*.f64 b 16))))) (+.f64 1 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3)) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 b (*.f64 b 16))))))))
(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 b (*.f64 b 16))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b (*.f64 b 16)))))))
(pow.f64 (*.f64 b (*.f64 b 16)) 1)
(*.f64 b (*.f64 b 16))
(pow.f64 (*.f64 b 4) 2)
(*.f64 b (*.f64 b 16))
(pow.f64 (*.f64 (sqrt.f64 b) 2) 4)
(*.f64 b (*.f64 b 16))
(pow.f64 (cbrt.f64 (*.f64 b 4)) 6)
(*.f64 b (*.f64 b 16))
(pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3)
(*.f64 b (*.f64 b 16))
(pow.f64 (*.f64 (pow.f64 b 3) 64) 2/3)
(*.f64 (cbrt.f64 (*.f64 (pow.f64 b 3) 64)) (cbrt.f64 (*.f64 (pow.f64 b 3) 64)))
(pow.f64 (*.f64 (pow.f64 b 4) 256) 1/2)
(sqrt.f64 (*.f64 (pow.f64 b 4) 256))
(pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/3)
(cbrt.f64 (*.f64 (pow.f64 b 6) 4096))
(sqrt.f64 (*.f64 (pow.f64 b 4) 256))
(fabs.f64 (*.f64 b (*.f64 b 16)))
(*.f64 b (*.f64 b 16))
(log.f64 (pow.f64 (pow.f64 (exp.f64 b) b) 16))
(*.f64 b (*.f64 b 16))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 b 16)))))
(*.f64 b (*.f64 b 16))
(cbrt.f64 (*.f64 (pow.f64 b 6) 4096))
(expm1.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))
(*.f64 b (*.f64 b 16))
(exp.f64 (*.f64 (log.f64 (*.f64 b 4)) 2))
(*.f64 b (*.f64 b 16))
(log1p.f64 (expm1.f64 (*.f64 b (*.f64 b 16))))
(*.f64 b (*.f64 b 16))

localize39.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
99.3%
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
99.3%
(*.f64 b (sqrt.f64 2))
98.6%
(exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))
92.3%
(-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1)
Compiler

Compiled 72 to 62 computations (13.9% saved)

series26.0ms (0%)

Counts
3 → 36
Calls

9 calls:

TimeVariablePointExpression
12.0ms
b
@inf
(-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1)
11.0ms
b
@-inf
(-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1)
2.0ms
b
@0
(-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1)
0.0ms
b
@0
(exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))
0.0ms
b
@-inf
(exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))

rewrite183.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
996×*-commutative
742×unswap-sqr
594×swap-sqr
416×associate-*r/
410×sqr-pow
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
01471
128169
2292269
Stop Event
node limit
Counts
3 → 237
Calls
Call 1
Inputs
(-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1)
(exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
Outputs
(((+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 1 (-.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 0 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) -2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 -1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 (+.f64 -1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 2 (*.f64 (*.f64 b (sqrt.f64 2)) (cbrt.f64 (sqrt.f64 8)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 2 1/4) (*.f64 (sqrt.f64 8) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 8 1/4) (*.f64 (*.f64 b (sqrt.f64 2)) (pow.f64 8 1/4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (sqrt.f64 (*.f64 b (sqrt.f64 2))) (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 b (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (cbrt.f64 (sqrt.f64 2)) (*.f64 (cbrt.f64 2) (*.f64 (sqrt.f64 8) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (cbrt.f64 (sqrt.f64 8)) (*.f64 2 (*.f64 b (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (cbrt.f64 (*.f64 b (sqrt.f64 2))) (*.f64 (sqrt.f64 8) (cbrt.f64 (*.f64 2 (*.f64 b b))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (cbrt.f64 (*.f64 2 (*.f64 b b))) (*.f64 (sqrt.f64 8) (cbrt.f64 (*.f64 b (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (sqrt.f64 8) (sqrt.f64 2)) b) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 b (sqrt.f64 2)))) (sqrt.f64 (*.f64 b (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (sqrt.f64 8) (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (*.f64 b (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 2 (*.f64 b (sqrt.f64 2))) (cbrt.f64 (sqrt.f64 8))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (pow.f64 2 1/4) (*.f64 (sqrt.f64 8) b)) (pow.f64 2 1/4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (cbrt.f64 2) (*.f64 (sqrt.f64 8) b)) (cbrt.f64 (sqrt.f64 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (pow.f64 8 1/4)) (pow.f64 8 1/4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (cbrt.f64 (sqrt.f64 8))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (sqrt.f64 8) (cbrt.f64 (*.f64 b (sqrt.f64 2)))) (cbrt.f64 (*.f64 2 (*.f64 b b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (+.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 1) (+.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (-.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))) (-.f64 0 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (+.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 8 (*.f64 2 (*.f64 b b)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2))) (-.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 8 (*.f64 2 (*.f64 b b)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (+.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (-.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 8 1/4) (sqrt.f64 b))) (*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 8 1/4) (sqrt.f64 b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (*.f64 (sqrt.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))))) (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (*.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (*.f64 (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (*.f64 (pow.f64 8 1/4) (sqrt.f64 b)) (pow.f64 2 1/4)) (*.f64 (*.f64 (pow.f64 8 1/4) (sqrt.f64 b)) (pow.f64 2 1/4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3/2) (pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3) 1/6) (pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3) 1/6)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 1 (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (-.f64 -1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) 1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) 1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) 1) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) 1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) 1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) 1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (*.f64 (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (*.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((neg.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((neg.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((sqrt.f64 (*.f64 8 (*.f64 2 (*.f64 b b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 b) (sqrt.f64 2)) (sqrt.f64 8))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 (*.f64 b (sqrt.f64 2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((exp.f64 (log.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((fma.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((fma.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((fma.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)))
(((+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 0 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 -1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((-.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((-.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (-.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (-.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2))) (*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))) (*.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2)) (cbrt.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2)) (cbrt.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (+.f64 (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 1) (-.f64 (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 3/2) (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 3/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 (E.f64) (/.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2)) (pow.f64 (E.f64) (/.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 1/6) (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 1/6)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (/.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (/.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (+.f64 1 (*.f64 -8 (*.f64 2 (*.f64 b b)))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (+.f64 1 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3)) (-.f64 (+.f64 1 (*.f64 8 (*.f64 2 (*.f64 b b)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 1 (+.f64 1 (*.f64 -8 (*.f64 2 (*.f64 b b))))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 1 (+.f64 1 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3))) (-.f64 (+.f64 1 (*.f64 8 (*.f64 2 (*.f64 b b)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (+.f64 1 (*.f64 -8 (*.f64 2 (*.f64 b b)))) 1) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (+.f64 1 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3)) 1) (-.f64 (+.f64 1 (*.f64 8 (*.f64 2 (*.f64 b b)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (*.f64 8 (*.f64 2 (*.f64 b b))) 1) (-.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2) 1) (-.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2) 1) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((sqrt.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((log.f64 (exp.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((cbrt.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((expm1.f64 (log.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((log1p.f64 (expm1.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)))
(((+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 1 (-.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 0 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) -2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 -1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((+.f64 (+.f64 -1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((-.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((-.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 1 (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (-.f64 -1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) 1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) 1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) 1) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) 1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) 1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) 1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (*.f64 (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (*.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((neg.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((neg.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((sqrt.f64 (*.f64 8 (*.f64 2 (*.f64 b b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 b) (sqrt.f64 2)) (sqrt.f64 8))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 (*.f64 b (sqrt.f64 2)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((exp.f64 (log.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((fma.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((fma.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((fma.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)))

simplify255.0ms (0.2%)

Algorithm
egg-herbie
Rules
1184×associate-+r-
1152×associate-+l-
940×+-commutative
738×associate-*r*
650×fma-def
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
046719189
1130717139
2602617139
Stop Event
node limit
Counts
273 → 296
Calls
Call 1
Inputs
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (+.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 (+.f64 (*.f64 1/6 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))) (pow.f64 b 3))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (+.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 (*.f64 (pow.f64 b 4) (+.f64 (*.f64 1/24 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (*.f64 1/3 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))))))) (*.f64 (+.f64 (*.f64 1/6 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))) (pow.f64 b 3)))))
(-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 1)
(-.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(-.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(-.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 1)
(-.f64 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(-.f64 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(-.f64 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
1
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) 1)
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (+.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) 1))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (+.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 1 (*.f64 (+.f64 (*.f64 1/6 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))) (pow.f64 b 3)))))
(exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 0)
(+.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)
(+.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1))
(+.f64 1 (-.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(+.f64 0 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))
(+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) -2)
(+.f64 -1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(+.f64 (+.f64 -1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 1)
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 2 (*.f64 (*.f64 b (sqrt.f64 2)) (cbrt.f64 (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))
(*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))
(*.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)
(*.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))
(*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 2 1/4) (*.f64 (sqrt.f64 8) b)))
(*.f64 (pow.f64 8 1/4) (*.f64 (*.f64 b (sqrt.f64 2)) (pow.f64 8 1/4)))
(*.f64 (sqrt.f64 (*.f64 b (sqrt.f64 2))) (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 b (sqrt.f64 2)))))
(*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 (cbrt.f64 (sqrt.f64 2)) (*.f64 (cbrt.f64 2) (*.f64 (sqrt.f64 8) b)))
(*.f64 (cbrt.f64 (sqrt.f64 8)) (*.f64 2 (*.f64 b (sqrt.f64 2))))
(*.f64 (cbrt.f64 (*.f64 b (sqrt.f64 2))) (*.f64 (sqrt.f64 8) (cbrt.f64 (*.f64 2 (*.f64 b b)))))
(*.f64 (cbrt.f64 (*.f64 2 (*.f64 b b))) (*.f64 (sqrt.f64 8) (cbrt.f64 (*.f64 b (sqrt.f64 2)))))
(*.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))))
(*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))
(*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(*.f64 (*.f64 (sqrt.f64 8) (sqrt.f64 2)) b)
(*.f64 (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 b (sqrt.f64 2)))) (sqrt.f64 (*.f64 b (sqrt.f64 2))))
(*.f64 (*.f64 (sqrt.f64 8) (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (*.f64 b (sqrt.f64 2))))
(*.f64 (*.f64 2 (*.f64 b (sqrt.f64 2))) (cbrt.f64 (sqrt.f64 8)))
(*.f64 (*.f64 (pow.f64 2 1/4) (*.f64 (sqrt.f64 8) b)) (pow.f64 2 1/4))
(*.f64 (*.f64 (cbrt.f64 2) (*.f64 (sqrt.f64 8) b)) (cbrt.f64 (sqrt.f64 2)))
(*.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (pow.f64 8 1/4)) (pow.f64 8 1/4))
(*.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (cbrt.f64 (sqrt.f64 8))) 2)
(*.f64 (*.f64 (sqrt.f64 8) (cbrt.f64 (*.f64 b (sqrt.f64 2)))) (cbrt.f64 (*.f64 2 (*.f64 b b))))
(*.f64 (+.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 1))
(*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 1) (+.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))))
(*.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))
(*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))
(*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))
(*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (-.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))) (-.f64 0 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (+.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 8 (*.f64 2 (*.f64 b b))))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2))) (-.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 8 (*.f64 2 (*.f64 b b)))) 1))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (+.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (-.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))))
(*.f64 (*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 8 1/4) (sqrt.f64 b))) (*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 8 1/4) (sqrt.f64 b))))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (*.f64 (sqrt.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))))) (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))))))
(*.f64 (*.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (*.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (*.f64 (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(*.f64 (*.f64 (*.f64 (pow.f64 8 1/4) (sqrt.f64 b)) (pow.f64 2 1/4)) (*.f64 (*.f64 (pow.f64 8 1/4) (sqrt.f64 b)) (pow.f64 2 1/4)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3/2) (pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3/2))
(*.f64 (pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3) 1/6) (pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3) 1/6))
(/.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)
(/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 1 (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(/.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (-.f64 -1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) 1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) 1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) 1) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) 1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))
(/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) 1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))
(/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) 1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (*.f64 (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (*.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))))
(pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)
(pow.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2)
(pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3)
(pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3) 1/3)
(neg.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(neg.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))))
(sqrt.f64 (*.f64 8 (*.f64 2 (*.f64 b b))))
(log.f64 (pow.f64 (pow.f64 (exp.f64 b) (sqrt.f64 2)) (sqrt.f64 8)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(cbrt.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3))
(cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 (*.f64 b (sqrt.f64 2)) 3)))
(expm1.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(exp.f64 (log.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(log1p.f64 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(fma.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)
(fma.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) -1)
(fma.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) -1)
(+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)
(+.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 0)
(+.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))
(+.f64 0 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) -1)
(+.f64 -1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(-.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 0)
(-.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 1)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (-.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 1))
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (-.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) 1))
(-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 1)
(*.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(*.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))
(*.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2))) (*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2))))
(*.f64 (*.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))) (*.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))))
(*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2)) (cbrt.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2)) (cbrt.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))))
(*.f64 (+.f64 (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 1) (-.f64 (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 1))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 3/2) (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 3/2))
(*.f64 (pow.f64 (E.f64) (/.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2)) (pow.f64 (E.f64) (/.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2)))
(*.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 1/6) (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 1/6))
(*.f64 (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (/.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (/.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)))
(*.f64 (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)))
(/.f64 (+.f64 1 (*.f64 -8 (*.f64 2 (*.f64 b b)))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3)) (-.f64 (+.f64 1 (*.f64 8 (*.f64 2 (*.f64 b b)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (*.f64 1 (+.f64 1 (*.f64 -8 (*.f64 2 (*.f64 b b))))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (*.f64 1 (+.f64 1 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3))) (-.f64 (+.f64 1 (*.f64 8 (*.f64 2 (*.f64 b b)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (*.f64 (+.f64 1 (*.f64 -8 (*.f64 2 (*.f64 b b)))) 1) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3)) 1) (-.f64 (+.f64 1 (*.f64 8 (*.f64 2 (*.f64 b b)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (-.f64 (*.f64 8 (*.f64 2 (*.f64 b b))) 1) (-.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(/.f64 (-.f64 (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2) 1) (-.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) -1))
(/.f64 (-.f64 (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2) 1) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 1))
(pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 1)
(pow.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2)
(pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 3)
(pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 1/3)
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(sqrt.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))
(log.f64 (exp.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))
(log.f64 (+.f64 1 (expm1.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))))
(cbrt.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))
(expm1.f64 (log.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(log1p.f64 (expm1.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))
(+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 0)
(+.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)
(+.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1))
(+.f64 1 (-.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(+.f64 0 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))
(+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) -2)
(+.f64 -1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(+.f64 (+.f64 -1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 1)
(-.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 1)
(-.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)
(/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 1 (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(/.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (-.f64 -1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) 1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) 1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) 1) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) 1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))
(/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) 1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))
(/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) 1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (*.f64 (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (*.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))))
(pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)
(pow.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2)
(pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3)
(pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3) 1/3)
(neg.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(neg.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))))
(sqrt.f64 (*.f64 8 (*.f64 2 (*.f64 b b))))
(log.f64 (pow.f64 (pow.f64 (exp.f64 b) (sqrt.f64 2)) (sqrt.f64 8)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(cbrt.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3))
(cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 (*.f64 b (sqrt.f64 2)) 3)))
(expm1.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(exp.f64 (log.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(log1p.f64 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(fma.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)
(fma.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) -1)
(fma.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) -1)
Outputs
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) (*.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)) 0)))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) (*.f64 b (*.f64 b 0)))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (+.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 (+.f64 (*.f64 1/6 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))) (pow.f64 b 3))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)) 0) (*.f64 (fma.f64 1/6 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)) -1/6)) (pow.f64 b 3))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) (fma.f64 (*.f64 b b) 0 (*.f64 (*.f64 (*.f64 16 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) 0) (pow.f64 b 3))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (+.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 (*.f64 (pow.f64 b 4) (+.f64 (*.f64 1/24 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (*.f64 1/3 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))))))) (*.f64 (+.f64 (*.f64 1/6 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))) (pow.f64 b 3)))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)) 0) (fma.f64 (pow.f64 b 4) (fma.f64 1/24 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)) -1/6))) (*.f64 (fma.f64 1/6 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)) -1/6)) (pow.f64 b 3)))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) (fma.f64 (*.f64 b b) 0 (fma.f64 (*.f64 (*.f64 16 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) 0) (pow.f64 b 3) (*.f64 (pow.f64 b 4) 0))))
(-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 1)
(expm1.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 (neg.f64 (log.f64 b)))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1)
(-.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 (neg.f64 (log.f64 b))))) (-.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) 1))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1))
(-.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 (neg.f64 (log.f64 b))))) (-.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) 1))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1))
(-.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 (neg.f64 (log.f64 b))))) (-.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) 1))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1))
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 1)
(expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(fma.f64 (pow.f64 (/.f64 -1 b) -1) (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))) -1)
(-.f64 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) 1))
(+.f64 -1 (fma.f64 (pow.f64 (/.f64 -1 b) -1) (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))) (*.f64 (/.f64 (pow.f64 (/.f64 -1 b) -1) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))) (*.f64 b (sqrt.f64 8))))))
(-.f64 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) 1))
(+.f64 -1 (fma.f64 (pow.f64 (/.f64 -1 b) -1) (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))) (*.f64 (/.f64 (pow.f64 (/.f64 -1 b) -1) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))) (*.f64 b (sqrt.f64 8))))))
(-.f64 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) 1))
(+.f64 -1 (fma.f64 (pow.f64 (/.f64 -1 b) -1) (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))) (*.f64 (/.f64 (pow.f64 (/.f64 -1 b) -1) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))) (*.f64 b (sqrt.f64 8))))))
1
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) 1)
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (+.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) 1))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)) 0) 1))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) (fma.f64 (*.f64 b b) 0 1))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (+.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 1 (*.f64 (+.f64 (*.f64 1/6 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (+.f64 (*.f64 1/3 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 -1/2 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))) (pow.f64 b 3)))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) (+.f64 (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)) 0) 1) (*.f64 (fma.f64 1/6 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)) -1/6)) (pow.f64 b 3))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) (fma.f64 (*.f64 b b) 0 (fma.f64 (*.f64 (*.f64 16 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) 0) (pow.f64 b 3) 1)))
(exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(*.f64 (pow.f64 (/.f64 -1 b) -1) (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(fma.f64 (pow.f64 (/.f64 -1 b) -1) (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))) (*.f64 (/.f64 (pow.f64 (/.f64 -1 b) -1) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))) (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(fma.f64 (pow.f64 (/.f64 -1 b) -1) (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))) (*.f64 (/.f64 (pow.f64 (/.f64 -1 b) -1) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))) (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (neg.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(fma.f64 (pow.f64 (/.f64 -1 b) -1) (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))) (*.f64 (/.f64 (pow.f64 (/.f64 -1 b) -1) (sqrt.f64 2)) (/.f64 (*.f64 (sqrt.f64 2) (neg.f64 (sqrt.f64 8))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 0)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 1 (-.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 0 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) -2)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 -1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 (+.f64 -1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 2 (*.f64 (*.f64 b (sqrt.f64 2)) (cbrt.f64 (sqrt.f64 8))))
(*.f64 (cbrt.f64 (sqrt.f64 8)) (*.f64 (*.f64 2 b) (sqrt.f64 2)))
(*.f64 2 (*.f64 (*.f64 (cbrt.f64 (sqrt.f64 8)) b) (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (*.f64 b (sqrt.f64 2)) (sqrt.f64 8))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 2 1/4) (*.f64 (sqrt.f64 8) b)))
(*.f64 (pow.f64 2 1/4) (*.f64 (*.f64 b (sqrt.f64 8)) (pow.f64 2 1/4)))
(*.f64 (*.f64 b (sqrt.f64 8)) (pow.f64 2 1/2))
(*.f64 (pow.f64 8 1/4) (*.f64 (*.f64 b (sqrt.f64 2)) (pow.f64 8 1/4)))
(*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 (pow.f64 8 1/4) (pow.f64 8 1/4)))
(*.f64 (sqrt.f64 2) (*.f64 b (pow.f64 8 1/2)))
(*.f64 (sqrt.f64 (*.f64 b (sqrt.f64 2))) (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 b (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (cbrt.f64 (sqrt.f64 2)) (*.f64 (cbrt.f64 2) (*.f64 (sqrt.f64 8) b)))
(*.f64 (cbrt.f64 (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cbrt.f64 2)))
(*.f64 (*.f64 b (sqrt.f64 8)) (*.f64 (cbrt.f64 (sqrt.f64 2)) (cbrt.f64 2)))
(*.f64 (cbrt.f64 (sqrt.f64 8)) (*.f64 2 (*.f64 b (sqrt.f64 2))))
(*.f64 (cbrt.f64 (sqrt.f64 8)) (*.f64 (*.f64 2 b) (sqrt.f64 2)))
(*.f64 2 (*.f64 (*.f64 (cbrt.f64 (sqrt.f64 8)) b) (sqrt.f64 2)))
(*.f64 (cbrt.f64 (*.f64 b (sqrt.f64 2))) (*.f64 (sqrt.f64 8) (cbrt.f64 (*.f64 2 (*.f64 b b)))))
(*.f64 (sqrt.f64 8) (*.f64 (cbrt.f64 (*.f64 2 (*.f64 b b))) (cbrt.f64 (*.f64 (sqrt.f64 2) b))))
(*.f64 (sqrt.f64 8) (*.f64 (cbrt.f64 (*.f64 (sqrt.f64 2) b)) (cbrt.f64 (*.f64 2 (*.f64 b b)))))
(*.f64 (cbrt.f64 (*.f64 2 (*.f64 b b))) (*.f64 (sqrt.f64 8) (cbrt.f64 (*.f64 b (sqrt.f64 2)))))
(*.f64 (sqrt.f64 8) (*.f64 (cbrt.f64 (*.f64 2 (*.f64 b b))) (cbrt.f64 (*.f64 (sqrt.f64 2) b))))
(*.f64 (sqrt.f64 8) (*.f64 (cbrt.f64 (*.f64 (sqrt.f64 2) b)) (cbrt.f64 (*.f64 2 (*.f64 b b)))))
(*.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))))
(*.f64 2 (*.f64 (cbrt.f64 (*.f64 2 (*.f64 b b))) (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(*.f64 2 (*.f64 (cbrt.f64 (*.f64 2 (*.f64 b b))) (cbrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 2 (*.f64 (cbrt.f64 (*.f64 2 (*.f64 b b))) (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(*.f64 2 (*.f64 (cbrt.f64 (*.f64 2 (*.f64 b b))) (cbrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(*.f64 (*.f64 (sqrt.f64 8) (sqrt.f64 2)) b)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 b (sqrt.f64 2)))) (sqrt.f64 (*.f64 b (sqrt.f64 2))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (*.f64 (sqrt.f64 8) (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (*.f64 b (sqrt.f64 2))))
(*.f64 (sqrt.f64 8) (*.f64 (cbrt.f64 (*.f64 2 (*.f64 b b))) (cbrt.f64 (*.f64 (sqrt.f64 2) b))))
(*.f64 (sqrt.f64 8) (*.f64 (cbrt.f64 (*.f64 (sqrt.f64 2) b)) (cbrt.f64 (*.f64 2 (*.f64 b b)))))
(*.f64 (*.f64 2 (*.f64 b (sqrt.f64 2))) (cbrt.f64 (sqrt.f64 8)))
(*.f64 (cbrt.f64 (sqrt.f64 8)) (*.f64 (*.f64 2 b) (sqrt.f64 2)))
(*.f64 2 (*.f64 (*.f64 (cbrt.f64 (sqrt.f64 8)) b) (sqrt.f64 2)))
(*.f64 (*.f64 (pow.f64 2 1/4) (*.f64 (sqrt.f64 8) b)) (pow.f64 2 1/4))
(*.f64 (pow.f64 2 1/4) (*.f64 (*.f64 b (sqrt.f64 8)) (pow.f64 2 1/4)))
(*.f64 (*.f64 b (sqrt.f64 8)) (pow.f64 2 1/2))
(*.f64 (*.f64 (cbrt.f64 2) (*.f64 (sqrt.f64 8) b)) (cbrt.f64 (sqrt.f64 2)))
(*.f64 (cbrt.f64 (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cbrt.f64 2)))
(*.f64 (*.f64 b (sqrt.f64 8)) (*.f64 (cbrt.f64 (sqrt.f64 2)) (cbrt.f64 2)))
(*.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (pow.f64 8 1/4)) (pow.f64 8 1/4))
(*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 (pow.f64 8 1/4) (pow.f64 8 1/4)))
(*.f64 (sqrt.f64 2) (*.f64 b (pow.f64 8 1/2)))
(*.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (cbrt.f64 (sqrt.f64 8))) 2)
(*.f64 (cbrt.f64 (sqrt.f64 8)) (*.f64 (*.f64 2 b) (sqrt.f64 2)))
(*.f64 2 (*.f64 (*.f64 (cbrt.f64 (sqrt.f64 8)) b) (sqrt.f64 2)))
(*.f64 (*.f64 (sqrt.f64 8) (cbrt.f64 (*.f64 b (sqrt.f64 2)))) (cbrt.f64 (*.f64 2 (*.f64 b b))))
(*.f64 (sqrt.f64 8) (*.f64 (cbrt.f64 (*.f64 2 (*.f64 b b))) (cbrt.f64 (*.f64 (sqrt.f64 2) b))))
(*.f64 (sqrt.f64 8) (*.f64 (cbrt.f64 (*.f64 (sqrt.f64 2) b)) (cbrt.f64 (*.f64 2 (*.f64 b b)))))
(*.f64 (+.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 1))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 1) (+.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (-.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))) (-.f64 0 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (neg.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (*.f64 (sqrt.f64 2) (neg.f64 (*.f64 b (sqrt.f64 8))))))
(*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (+.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 8 (*.f64 2 (*.f64 b b))))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 1 (fma.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)) (*.f64 16 (*.f64 b b)))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) (*.f64 (*.f64 b b) 16))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2))) (-.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 8 (*.f64 2 (*.f64 b b)))) 1))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4) (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) 2))) (+.f64 (fma.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)) (*.f64 16 (*.f64 b b))) -1))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) 2))) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) (fma.f64 16 (*.f64 b b) -1)))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (+.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (-.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) 3) (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) 3))) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (-.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) 3) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6))) (fma.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) (-.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4)))
(*.f64 (*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 8 1/4) (sqrt.f64 b))) (*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 8 1/4) (sqrt.f64 b))))
(*.f64 (pow.f64 2 1/4) (*.f64 (*.f64 (pow.f64 8 1/4) (sqrt.f64 b)) (*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 8 1/4) (sqrt.f64 b)))))
(*.f64 (pow.f64 2 1/2) (*.f64 (pow.f64 8 1/2) (*.f64 (sqrt.f64 b) (sqrt.f64 b))))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (*.f64 (sqrt.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))))) (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))))))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))))))
(*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (cbrt.f64 (sqrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(*.f64 (*.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (*.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (*.f64 (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (cbrt.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (sqrt.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))))))
(*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (cbrt.f64 (sqrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(*.f64 (*.f64 (*.f64 (pow.f64 8 1/4) (sqrt.f64 b)) (pow.f64 2 1/4)) (*.f64 (*.f64 (pow.f64 8 1/4) (sqrt.f64 b)) (pow.f64 2 1/4)))
(*.f64 (pow.f64 2 1/4) (*.f64 (*.f64 (pow.f64 8 1/4) (sqrt.f64 b)) (*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 8 1/4) (sqrt.f64 b)))))
(*.f64 (pow.f64 2 1/2) (*.f64 (pow.f64 8 1/2) (*.f64 (sqrt.f64 b) (sqrt.f64 b))))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3/2) (pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3/2))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(*.f64 (pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3) 1/6) (pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3) 1/6))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 1 (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))))
(*.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(*.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(*.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))))
(*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(*.f64 (/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (/.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(*.f64 (/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (/.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))))
(/.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (-.f64 -1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6) -1) (*.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)) (*.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6) -1) (*.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)) (*.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) 1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4) -1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4)) (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) 3) -1) (*.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)))))
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) 3)) (*.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) 3) -1) (*.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)))))
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) 3)) (*.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) 1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) 3) -1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)) (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (+.f64 1 (neg.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (neg.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 (neg.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 -2 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (/.f64 (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (/.f64 (sqrt.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))))
(*.f64 (/.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (/.f64 (cbrt.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)))))
(*.f64 (/.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) 1) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (*.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (+.f64 1 (neg.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (neg.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 (neg.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 -2 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (/.f64 (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (/.f64 (sqrt.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))))
(*.f64 (/.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (/.f64 (cbrt.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)))))
(*.f64 (/.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) 1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4) -1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4)) (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) 1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) 3) -1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)) (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6) -1) (*.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)) (*.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) 3) -1) (*.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)))))
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) 3)) (*.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)))))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) 1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (*.f64 (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (*.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (+.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (+.f64 (/.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)))) (+.f64 (/.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))) (*.f64 (/.f64 1 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 1 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))) (+.f64 (/.f64 1 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))))
(/.f64 (*.f64 (+.f64 (/.f64 1 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)))) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))) (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))) (+.f64 (/.f64 1 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)))) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))))
(pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(pow.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3) 1/3)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(neg.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(neg.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))))
(/.f64 (+.f64 1 (neg.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (neg.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 (neg.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 -2 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(sqrt.f64 (*.f64 8 (*.f64 2 (*.f64 b b))))
(sqrt.f64 (*.f64 16 (*.f64 b b)))
(sqrt.f64 (*.f64 (*.f64 b b) 16))
(log.f64 (pow.f64 (pow.f64 (exp.f64 b) (sqrt.f64 2)) (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (log.f64 (pow.f64 (exp.f64 b) (sqrt.f64 2))))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (log.f64 (exp.f64 b))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(cbrt.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 (*.f64 b (sqrt.f64 2)) 3)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(expm1.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(exp.f64 (log.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(log1p.f64 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(fma.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(fma.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) -1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(fma.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) -1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(+.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 0)
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(+.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(+.f64 0 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) -1)
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(+.f64 -1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(-.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 0)
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(-.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 1)
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (-.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 1))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (-.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) 1))
(+.f64 (-.f64 (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 1 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))) 1)
(+.f64 1 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)))))
(-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(+.f64 (-.f64 (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 1 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))) 1)
(+.f64 1 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)))))
(*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 1)
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(*.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(*.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(*.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2))) (*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2))))
(*.f64 (cbrt.f64 (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)) 2)) (*.f64 (cbrt.f64 (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1))) (sqrt.f64 (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)) 2)))))
(*.f64 (cbrt.f64 (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1))) (*.f64 (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)) 2) (cbrt.f64 (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)))))
(*.f64 (*.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))) (*.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2)) (cbrt.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2)) (cbrt.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))))
(*.f64 (cbrt.f64 (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)) 2)) (*.f64 (cbrt.f64 (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1))) (sqrt.f64 (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)) 2)))))
(*.f64 (cbrt.f64 (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1))) (*.f64 (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)) 2) (cbrt.f64 (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)))))
(*.f64 (+.f64 (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 1) (-.f64 (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 1))
(*.f64 (+.f64 1 (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (+.f64 (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) -1))
(*.f64 (+.f64 1 (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (+.f64 -1 (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 3/2) (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 3/2))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(*.f64 (pow.f64 (E.f64) (/.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2)) (pow.f64 (E.f64) (/.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2)))
(pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(pow.f64 (E.f64) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 1/6) (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 1/6))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(*.f64 (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (/.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (/.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(*.f64 (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(/.f64 (+.f64 1 (*.f64 -8 (*.f64 2 (*.f64 b b)))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(/.f64 (fma.f64 -16 (*.f64 b b) 1) (-.f64 1 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3)) (-.f64 (+.f64 1 (*.f64 8 (*.f64 2 (*.f64 b b)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))) 3)) (+.f64 1 (-.f64 (*.f64 16 (*.f64 b b)) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) 3)) (-.f64 (fma.f64 16 (*.f64 b b) 1) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) 3)) (-.f64 (*.f64 (*.f64 b b) 16) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1)))
(/.f64 (*.f64 1 (+.f64 1 (*.f64 -8 (*.f64 2 (*.f64 b b))))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(/.f64 (fma.f64 -16 (*.f64 b b) 1) (-.f64 1 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(/.f64 (*.f64 1 (+.f64 1 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3))) (-.f64 (+.f64 1 (*.f64 8 (*.f64 2 (*.f64 b b)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))) 3)) (+.f64 1 (-.f64 (*.f64 16 (*.f64 b b)) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) 3)) (-.f64 (fma.f64 16 (*.f64 b b) 1) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) 3)) (-.f64 (*.f64 (*.f64 b b) 16) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1)))
(/.f64 (*.f64 (+.f64 1 (*.f64 -8 (*.f64 2 (*.f64 b b)))) 1) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(/.f64 (fma.f64 -16 (*.f64 b b) 1) (-.f64 1 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3)) 1) (-.f64 (+.f64 1 (*.f64 8 (*.f64 2 (*.f64 b b)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))) 3)) (+.f64 1 (-.f64 (*.f64 16 (*.f64 b b)) (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) 3)) (-.f64 (fma.f64 16 (*.f64 b b) 1) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) 3)) (-.f64 (*.f64 (*.f64 b b) 16) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1)))
(/.f64 (-.f64 (*.f64 8 (*.f64 2 (*.f64 b b))) 1) (-.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(/.f64 (+.f64 (*.f64 16 (*.f64 b b)) -1) (fma.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)) -1))
(/.f64 (fma.f64 16 (*.f64 b b) -1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1))
(/.f64 (-.f64 (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2) 1) (-.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) -1))
(/.f64 (+.f64 (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) 2) -1) (+.f64 2 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) 2)) (+.f64 3 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(/.f64 (-.f64 (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2) 1) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 1))
(/.f64 (+.f64 (pow.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) 2) -1) (+.f64 2 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) 2)) (+.f64 3 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 1)
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(pow.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2)
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 3)
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(pow.f64 (E.f64) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 1/3)
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(sqrt.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))
(sqrt.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))
(fabs.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1))
(log.f64 (exp.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(log.f64 (+.f64 1 (expm1.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(cbrt.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(expm1.f64 (log.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(expm1.f64 (log.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(expm1.f64 (log.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)))
(log1p.f64 (expm1.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))
(fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1)
(+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 0)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 1 (-.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 0 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) -2)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 -1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(+.f64 (+.f64 -1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(-.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(-.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 1 (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))))
(*.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(*.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(*.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))) (/.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))))
(*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(*.f64 (/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (/.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))))
(*.f64 (/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (/.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))))
(/.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (-.f64 -1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6) -1) (*.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)) (*.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6) -1) (*.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)) (*.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) 1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4) -1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4)) (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) 3) -1) (*.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)))))
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) 3)) (*.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) 3) -1) (*.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)))))
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) 3)) (*.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) 1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) 3) -1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)) (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (+.f64 1 (neg.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (neg.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 (neg.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 -2 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (/.f64 (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (/.f64 (sqrt.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))))
(*.f64 (/.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (/.f64 (cbrt.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)))))
(*.f64 (/.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) 1) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (*.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (+.f64 1 (neg.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (neg.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 (neg.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 -2 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (/.f64 (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (/.f64 (sqrt.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1)) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))))
(*.f64 (/.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3))) (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (/.f64 (cbrt.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)))))
(*.f64 (/.f64 (*.f64 2 (cbrt.f64 (*.f64 2 (*.f64 b b)))) (cbrt.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) 1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2)))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4) -1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4)) (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) 3) 1) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 4) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) 3) -1) (*.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)) (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 4)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6) -1) (*.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)) (*.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))))
(/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) 3) 1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 6) 1) (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) 3) -1) (*.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)))))
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) 3)) (*.f64 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 6)))))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) 1) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (sqrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (*.f64 (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (cbrt.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) 1) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (*.f64 1 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (*.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (+.f64 (/.f64 1 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (+.f64 (/.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)))) (+.f64 (/.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))) (*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))) (/.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))) (*.f64 (/.f64 1 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 1 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))) (+.f64 (/.f64 1 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))))
(/.f64 (*.f64 (+.f64 (/.f64 1 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)))) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))) (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))) (+.f64 (/.f64 1 (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)))) (/.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3) (+.f64 1 (*.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2))))))
(pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(pow.f64 (sqrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 2)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(pow.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3) 1/3)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(neg.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) -1) (neg.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(neg.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 3)) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) 2) (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))))
(/.f64 (+.f64 1 (neg.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3))) (neg.f64 (+.f64 (+.f64 2 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 (neg.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 2)) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2)))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 3)) (-.f64 -2 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) 1) 2))))
(sqrt.f64 (*.f64 8 (*.f64 2 (*.f64 b b))))
(sqrt.f64 (*.f64 16 (*.f64 b b)))
(sqrt.f64 (*.f64 (*.f64 b b) 16))
(log.f64 (pow.f64 (pow.f64 (exp.f64 b) (sqrt.f64 2)) (sqrt.f64 8)))
(*.f64 (sqrt.f64 8) (log.f64 (pow.f64 (exp.f64 b) (sqrt.f64 2))))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (log.f64 (exp.f64 b))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(cbrt.f64 (pow.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 3))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 (*.f64 b (sqrt.f64 2)) 3)))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(expm1.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(exp.f64 (log.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(log1p.f64 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(fma.f64 1 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) -1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(fma.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) -1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))
(fma.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1)) -1)
(*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))

localize460.0ms (0.3%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
80.1%
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
70.9%
(sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))
57.4%
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
57.3%
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
Compiler

Compiled 350 to 171 computations (51.1% saved)

series37.0ms (0%)

Counts
2 → 108
Calls

27 calls:

TimeVariablePointExpression
6.0ms
angle
@0
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
4.0ms
y-scale
@0
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
3.0ms
x-scale
@0
(sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))
2.0ms
angle
@0
(sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))
2.0ms
b
@0
(sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))

rewrite67.0ms (0%)

Algorithm
batch-egg-rewrite
Rules
720×add-sqr-sqrt
706×*-un-lft-identity
702×pow1
662×add-exp-log
662×add-cbrt-cube
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
033248
1716248
Stop Event
node limit
Counts
2 → 22
Calls
Call 1
Inputs
(sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
Outputs
(((*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((*.f64 1 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((*.f64 (sqrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (sqrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (sqrt.f64 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (cbrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((*.f64 (cbrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((*.f64 (pow.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) 1/4) (pow.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) 1/4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((*.f64 (pow.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) 1/2) (pow.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((pow.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((log.f64 (exp.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((cbrt.f64 (*.f64 2 (*.f64 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((expm1.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((exp.f64 (log.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((log1p.f64 (expm1.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)))
(((pow.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((log.f64 (exp.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((cbrt.f64 (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 8 (*.f64 y-scale y-scale)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((exp.f64 (log.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) #f)))

simplify214.0ms (0.2%)

Algorithm
egg-herbie
Rules
1490×associate-/r/
1442×associate-*r*
820×*-commutative
800×times-frac
782×associate-*l*
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
042521606
1138321430
2652021430
Stop Event
node limit
Counts
130 → 211
Calls
Call 1
Inputs
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (+.f64 (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(/.f64 (*.f64 (sqrt.f64 2) b) x-scale)
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) b)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) b)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2))))) b)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) b)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2))))) b)) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) b) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 6) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2))))))) b)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 -1 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (*.f64 1/16 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))))) (*.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 -1/16 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) b)) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) b)) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (sqrt.f64 8)))))) b))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 6) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2)))) (sqrt.f64 8)))))) b)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) b)) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (sqrt.f64 8)))))) b)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (*.f64 1/16 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))))))
(*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 -1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (*.f64 -1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(+.f64 (*.f64 -1/16 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (*.f64 -1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))))
(*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) 1)
(*.f64 1 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))
(*.f64 (sqrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (sqrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (sqrt.f64 2))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (cbrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))
(*.f64 (cbrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(*.f64 (pow.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) 1/4) (pow.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) 1/4))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) 1/2) (pow.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) 1/2))
(pow.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) 1/2)
(pow.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) 1)
(log.f64 (exp.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(cbrt.f64 (*.f64 2 (*.f64 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))))
(expm1.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(exp.f64 (log.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(log1p.f64 (expm1.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(pow.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))) 1)
(log.f64 (exp.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(cbrt.f64 (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 8 (*.f64 y-scale y-scale))))))
(expm1.f64 (log1p.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(exp.f64 (log.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(log1p.f64 (expm1.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
Outputs
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) x-scale))))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 a a))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) (pow.f64 b 3)))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) x-scale)))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 x-scale (pow.f64 b 3))) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 x-scale (pow.f64 b 3))) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 a a))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) (pow.f64 b 3)))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) (fma.f64 1/16 (/.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6)) x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5) (pow.f64 b 5))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) x-scale))))))
(+.f64 (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 x-scale (pow.f64 b 3))) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) (/.f64 1/16 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5))) (*.f64 (pow.f64 a 6) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (sqrt.f64 2))))))
(+.f64 (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 a a))) (*.f64 (*.f64 1/16 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5))) (pow.f64 a 6)))) (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 x-scale (pow.f64 b 3))) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale)
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 b b)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 b b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale) (fma.f64 -1/8 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 (*.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3)) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(+.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 b b)))) (*.f64 (*.f64 -1/8 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 3))))))
(+.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 b b))) (*.f64 (*.f64 -1/8 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 3))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale) (fma.f64 -1/8 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 (*.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3)) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)))) (fma.f64 1/16 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 b 6)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6)) (*.f64 (*.f64 x-scale (pow.f64 a 5)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(+.f64 (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 3)))) (/.f64 (*.f64 (*.f64 1/16 (*.f64 (sqrt.f64 2) (pow.f64 b 6))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (*.f64 x-scale (pow.f64 a 5))))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 b b)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 3)))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 b b))) (*.f64 (/.f64 (*.f64 1/16 (sqrt.f64 2)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (*.f64 x-scale (pow.f64 a 5))) (pow.f64 b 6))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)))))
(*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale))
(neg.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 2)) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 (neg.f64 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) -1/2))
(fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 b b)))) -1/2 (/.f64 (*.f64 (neg.f64 (sqrt.f64 2)) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale))
(fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 b b))) -1/2 (*.f64 (neg.f64 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/8 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 (*.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3)) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)))) (fma.f64 -1 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) -1/2)))
(fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 3)))) 1/8 (fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 b b)))) -1/2 (/.f64 (*.f64 (neg.f64 (sqrt.f64 2)) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)))
(fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 3)))) 1/8 (fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 b b))) -1/2 (*.f64 (neg.f64 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (+.f64 (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 1/8 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 (*.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3)) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)))) (fma.f64 -1 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale) (fma.f64 -1/16 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 b 6)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6)) (*.f64 (*.f64 x-scale (pow.f64 a 5)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) -1/2))))
(fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 3)))) 1/8 (-.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 b b)))) -1/2 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)) (/.f64 (pow.f64 b 6) (pow.f64 a 5)))) -1/16)) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 3)))) 1/8 (-.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 b b))) -1/2 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)) (/.f64 (pow.f64 b 6) (pow.f64 a 5)))) -1/16)) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(/.f64 (*.f64 (sqrt.f64 2) b) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale b))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) b)
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) b)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))
(fma.f64 1/2 (/.f64 x-scale (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 angle angle)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale))) (*.f64 (sqrt.f64 2) (*.f64 angle angle)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) b))
(fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2))))) (*.f64 (sqrt.f64 2) (*.f64 angle angle)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) b))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) b)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2))))) b)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale)))
(fma.f64 1/2 (/.f64 x-scale (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 angle angle)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (fma.f64 1/2 (/.f64 x-scale (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 4)) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) b) 2))))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b))))
(fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale))) (*.f64 (sqrt.f64 2) (*.f64 angle angle)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 x-scale x-scale)) (*.f64 b b))) (pow.f64 (/.f64 (*.f64 (*.f64 1/2 x-scale) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale)))) b) 2)) (sqrt.f64 2)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) b)))
(fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2))))) (*.f64 (sqrt.f64 2) (*.f64 angle angle)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (pow.f64 (*.f64 (/.f64 (*.f64 1/2 x-scale) b) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))))) 2)) (sqrt.f64 2)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) b)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) b)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2))))) b)) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) b) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 6) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2))))))) b)))))
(fma.f64 1/2 (/.f64 x-scale (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 angle angle)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (+.f64 (fma.f64 1/2 (/.f64 x-scale (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 4)) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) b) 2))))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b))) (*.f64 1/2 (/.f64 x-scale (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 6)) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))) (*.f64 -1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 b b) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) b) 2)))))))))))))
(fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale))) (*.f64 (sqrt.f64 2) (*.f64 angle angle)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 x-scale x-scale)) (*.f64 b b))) (pow.f64 (/.f64 (*.f64 (*.f64 1/2 x-scale) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale)))) b) 2)) (sqrt.f64 2)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (pow.f64 angle 6) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 -1/2 (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 x-scale x-scale)) (*.f64 b b))) (pow.f64 (/.f64 (*.f64 (*.f64 1/2 x-scale) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale)))) b) 2)) (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))) (*.f64 b b)))) (sqrt.f64 2)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) b))))
(fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2))))) (*.f64 (sqrt.f64 2) (*.f64 angle angle)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (pow.f64 (*.f64 (/.f64 (*.f64 1/2 x-scale) b) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))))) 2)) (sqrt.f64 2)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (pow.f64 angle 6) (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (*.f64 (/.f64 (*.f64 -1/2 (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2))))))) (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (pow.f64 (*.f64 (/.f64 (*.f64 1/2 x-scale) b) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))))) 2))))) (sqrt.f64 2)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) b))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale)
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 b b)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 b b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale) (fma.f64 -1/8 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 (*.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3)) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(+.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 b b)))) (*.f64 (*.f64 -1/8 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 3))))))
(+.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 b b))) (*.f64 (*.f64 -1/8 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 3))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale) (fma.f64 -1/8 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 (*.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3)) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)))) (fma.f64 1/16 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 b 6)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6)) (*.f64 (*.f64 x-scale (pow.f64 a 5)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 x-scale a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(+.f64 (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 3)))) (/.f64 (*.f64 (*.f64 1/16 (*.f64 (sqrt.f64 2) (pow.f64 b 6))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (*.f64 x-scale (pow.f64 a 5))))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 b b)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 3)))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 b b))) (*.f64 (/.f64 (*.f64 1/16 (sqrt.f64 2)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (*.f64 x-scale (pow.f64 a 5))) (pow.f64 b 6))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) x-scale))))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 a a))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) (pow.f64 b 3)))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) x-scale)))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 x-scale (pow.f64 b 3))) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 x-scale (pow.f64 b 3))) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 a a))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) (pow.f64 b 3)))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) (fma.f64 1/16 (/.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6)) x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5) (pow.f64 b 5))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) x-scale))))))
(+.f64 (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 x-scale (pow.f64 b 3))) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))) (/.f64 1/16 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5))) (*.f64 (pow.f64 a 6) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (sqrt.f64 2))))))
(+.f64 (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 a a))) (*.f64 (*.f64 1/16 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5))) (pow.f64 a 6)))) (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 x-scale (pow.f64 b 3))) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale))
(neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))
(/.f64 (neg.f64 (sqrt.f64 2)) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))
(*.f64 (neg.f64 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) x-scale)) -1/2))
(-.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) b))) -1/2) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))
(-.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 a a))) -1/2) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) (fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) x-scale)) (/.f64 (*.f64 1/8 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 4)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4))) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) (pow.f64 b 3))))))
(-.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) b))) -1/2 (*.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 x-scale (pow.f64 b 3))) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))
(-.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 a a))) -1/2 (*.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 x-scale (pow.f64 b 3))) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))))))
(fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) (fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) x-scale)) (fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) (pow.f64 b 3)))) (*.f64 -1/16 (/.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6)) x-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5) (pow.f64 b 5)))))))
(-.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) b))) -1/2 (fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 x-scale (pow.f64 b 3))) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (*.f64 -1/16 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)))))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))
(-.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 a a))) -1/2 (fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 x-scale (pow.f64 b 3))) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (*.f64 -1/16 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5))) (pow.f64 a 6)))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 -1 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 -1 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 -1 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 -1 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))
(+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(fma.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 2))) (sqrt.f64 8))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) b) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) (pow.f64 b 3))) (fma.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))))
(fma.f64 -1/8 (*.f64 (/.f64 y-scale (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (sqrt.f64 8)) (sqrt.f64 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 2))) (sqrt.f64 8))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(fma.f64 -1/8 (*.f64 (/.f64 y-scale (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (sqrt.f64 8)) (sqrt.f64 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) b) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (*.f64 1/16 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))))) (*.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) (pow.f64 b 3))) (fma.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))) (fma.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) (*.f64 1/16 (*.f64 (/.f64 y-scale (pow.f64 b 5)) (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5)))))))
(fma.f64 -1/8 (*.f64 (/.f64 y-scale (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (sqrt.f64 8)) (sqrt.f64 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 2))) (sqrt.f64 8))) (*.f64 1/16 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) y-scale) (pow.f64 b 5)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 a 6) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))))))
(fma.f64 -1/8 (*.f64 (/.f64 y-scale (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (sqrt.f64 8)) (sqrt.f64 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (fma.f64 1/16 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) y-scale) (pow.f64 b 5)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 a 6) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))) (*.f64 (/.f64 1/2 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 a (*.f64 a (sqrt.f64 8)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 a (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))
(fma.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 a (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (fma.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (*.f64 -1/8 (/.f64 y-scale (/.f64 (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8)))))))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 -1/8 (/.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 a 3) y-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 -1/8 (/.f64 (*.f64 (/.f64 y-scale (pow.f64 a 3)) (*.f64 (*.f64 (pow.f64 b 4) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(fma.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 a (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (fma.f64 1/16 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8)))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5))) (fma.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (*.f64 -1/8 (/.f64 y-scale (/.f64 (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))))))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 1/16 (*.f64 (/.f64 y-scale (pow.f64 a 5)) (/.f64 (*.f64 (pow.f64 b 6) (*.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (sqrt.f64 2)))) (fma.f64 -1/8 (/.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 a 3) y-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 1/16 (*.f64 (/.f64 y-scale (pow.f64 a 5)) (*.f64 (/.f64 (*.f64 (pow.f64 b 6) (*.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)) (sqrt.f64 2))) (fma.f64 -1/8 (/.f64 (*.f64 (/.f64 y-scale (pow.f64 a 3)) (*.f64 (*.f64 (pow.f64 b 4) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))))
(*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(neg.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))) (neg.f64 (sqrt.f64 2)))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(fma.f64 -1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 a (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(-.f64 (/.f64 (*.f64 (*.f64 -1/2 y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2)))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))
(-.f64 (*.f64 (/.f64 (*.f64 -1/2 y-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a)) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))
(fma.f64 -1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 a (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (*.f64 1/8 (/.f64 y-scale (/.f64 (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8)))))))))
(fma.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 1/8 (/.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 a 3) y-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (*.f64 (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))) (neg.f64 (sqrt.f64 2)))))
(fma.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 1/8 (/.f64 (*.f64 (/.f64 y-scale (pow.f64 a 3)) (*.f64 (*.f64 (pow.f64 b 4) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (*.f64 (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))) (neg.f64 (sqrt.f64 2)))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 -1/16 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(fma.f64 -1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 a (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (fma.f64 -1/16 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8)))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5))) (*.f64 1/8 (/.f64 y-scale (/.f64 (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))))))))
(fma.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (-.f64 (fma.f64 1/8 (/.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 a 3) y-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (*.f64 (*.f64 -1/16 (*.f64 (sqrt.f64 2) y-scale)) (*.f64 (pow.f64 b 6) (*.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))))))
(fma.f64 -1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (-.f64 (fma.f64 1/8 (/.f64 (*.f64 (/.f64 y-scale (pow.f64 a 3)) (*.f64 (*.f64 (pow.f64 b 4) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (/.f64 (*.f64 (*.f64 -1/16 (*.f64 (sqrt.f64 2) y-scale)) (*.f64 (pow.f64 b 6) (*.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6)))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) b)) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(fma.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 8)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(fma.f64 1/2 (*.f64 (/.f64 x-scale (/.f64 b x-scale)) (*.f64 y-scale (*.f64 (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 angle angle) (sqrt.f64 8))) (sqrt.f64 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)))
(fma.f64 1/2 (*.f64 (*.f64 (/.f64 x-scale b) x-scale) (*.f64 y-scale (*.f64 (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2))))) (*.f64 (*.f64 angle angle) (sqrt.f64 8))) (sqrt.f64 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) b)) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (sqrt.f64 8)))))) b))))
(fma.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 8)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (fma.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (*.f64 (*.f64 y-scale (pow.f64 angle 4)) (*.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) b) 2)) (sqrt.f64 8)))) b))))
(fma.f64 1/2 (*.f64 (/.f64 x-scale (/.f64 b x-scale)) (*.f64 y-scale (*.f64 (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 angle angle) (sqrt.f64 8))) (sqrt.f64 2)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale (/.f64 b x-scale)) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 x-scale x-scale)) (*.f64 b b))) (pow.f64 (/.f64 (*.f64 (*.f64 1/2 x-scale) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale)))) b) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 angle 4) y-scale)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale))))
(fma.f64 1/2 (*.f64 (*.f64 (/.f64 x-scale b) x-scale) (*.f64 y-scale (*.f64 (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2))))) (*.f64 (*.f64 angle angle) (sqrt.f64 8))) (sqrt.f64 2)))) (fma.f64 1/2 (*.f64 (*.f64 (/.f64 x-scale b) x-scale) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (pow.f64 (*.f64 (/.f64 (*.f64 1/2 x-scale) b) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 angle 4) y-scale)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 6) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2)))) (sqrt.f64 8)))))) b)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) b)) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (sqrt.f64 8)))))) b)))))
(fma.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 b (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (pow.f64 angle 6)) (*.f64 (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))) (*.f64 -1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 b b) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) b) 2))))))) (sqrt.f64 8)))))) (fma.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 8)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (fma.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (sqrt.f64 2)) (*.f64 (*.f64 y-scale (pow.f64 angle 4)) (*.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) b) 2)) (sqrt.f64 8)))) b)))))
(fma.f64 1/2 (*.f64 (/.f64 x-scale (/.f64 b x-scale)) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (*.f64 (pow.f64 angle 6) y-scale) (sqrt.f64 8)) (+.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (*.f64 -1/2 (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 x-scale x-scale)) (*.f64 b b))) (pow.f64 (/.f64 (*.f64 (*.f64 1/2 x-scale) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale)))) b) 2)) (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))) (*.f64 b b))))))) (fma.f64 1/2 (*.f64 (/.f64 x-scale (/.f64 b x-scale)) (*.f64 y-scale (*.f64 (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 angle angle) (sqrt.f64 8))) (sqrt.f64 2)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale (/.f64 b x-scale)) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (*.f64 x-scale x-scale)) (*.f64 b b))) (pow.f64 (/.f64 (*.f64 (*.f64 1/2 x-scale) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (/.f64 (*.f64 1/32400 (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))) (*.f64 x-scale x-scale)))) b) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 angle 4) y-scale)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)))))
(fma.f64 1/2 (*.f64 (*.f64 (/.f64 x-scale b) x-scale) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (*.f64 (pow.f64 angle 6) y-scale) (sqrt.f64 8)) (+.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (*.f64 (/.f64 (*.f64 -1/2 (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2))))))) (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (pow.f64 (*.f64 (/.f64 (*.f64 1/2 x-scale) b) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))))) 2)))))))) (fma.f64 1/2 (*.f64 (*.f64 (/.f64 x-scale b) x-scale) (*.f64 y-scale (*.f64 (*.f64 (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2))))) (*.f64 (*.f64 angle angle) (sqrt.f64 8))) (sqrt.f64 2)))) (fma.f64 1/2 (*.f64 (*.f64 (/.f64 x-scale b) x-scale) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (pow.f64 (*.f64 (/.f64 (*.f64 1/2 x-scale) b) (fma.f64 -1/32400 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 1/32400 (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (pow.f64 (PI.f64) 2)))))) 2)) (sqrt.f64 8)) (*.f64 (pow.f64 angle 4) y-scale)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 2) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 a (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))
(fma.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 a (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (fma.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (*.f64 -1/8 (/.f64 y-scale (/.f64 (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8)))))))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 -1/8 (/.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 a 3) y-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 -1/8 (/.f64 (*.f64 (/.f64 y-scale (pow.f64 a 3)) (*.f64 (*.f64 (pow.f64 b 4) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(fma.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 a (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (fma.f64 1/16 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8)))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5))) (fma.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (*.f64 -1/8 (/.f64 y-scale (/.f64 (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))))))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 1/16 (*.f64 (/.f64 y-scale (pow.f64 a 5)) (/.f64 (*.f64 (pow.f64 b 6) (*.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (sqrt.f64 2)))) (fma.f64 -1/8 (/.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b 4) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 a 3) y-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (*.f64 b (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) a) (/.f64 y-scale (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (fma.f64 1/16 (*.f64 (/.f64 y-scale (pow.f64 a 5)) (*.f64 (/.f64 (*.f64 (pow.f64 b 6) (*.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)) (sqrt.f64 2))) (fma.f64 -1/8 (/.f64 (*.f64 (/.f64 y-scale (pow.f64 a 3)) (*.f64 (*.f64 (pow.f64 b 4) (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))
(+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(fma.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 2))) (sqrt.f64 8))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(fma.f64 1/2 (*.f64 (/.f64 y-scale (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) b) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) (pow.f64 b 3))) (fma.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))))
(fma.f64 -1/8 (*.f64 (/.f64 y-scale (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (sqrt.f64 8)) (sqrt.f64 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 2))) (sqrt.f64 8))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(fma.f64 -1/8 (*.f64 (/.f64 y-scale (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (sqrt.f64 8)) (sqrt.f64 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) b) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (*.f64 1/16 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) (pow.f64 b 3))) (fma.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))) (fma.f64 1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) (*.f64 1/16 (*.f64 (/.f64 y-scale (pow.f64 b 5)) (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5)))))))
(fma.f64 -1/8 (*.f64 (/.f64 y-scale (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (sqrt.f64 8)) (sqrt.f64 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (fma.f64 1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 2))) (sqrt.f64 8))) (*.f64 1/16 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) y-scale) (pow.f64 b 5)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 a 6) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))))))
(fma.f64 -1/8 (*.f64 (/.f64 y-scale (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (sqrt.f64 8)) (sqrt.f64 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))) (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (fma.f64 1/16 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) y-scale) (pow.f64 b 5)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 a 6) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))) (*.f64 (/.f64 1/2 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 a (*.f64 a (sqrt.f64 8)))) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(neg.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8))))))
(*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (neg.f64 (sqrt.f64 2)))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 -1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(fma.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8))))) (*.f64 -1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))
(-.f64 (*.f64 -1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 2))) (sqrt.f64 8)))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(-.f64 (*.f64 -1/2 (*.f64 (/.f64 y-scale (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) b) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (*.f64 -1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(fma.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8))))) (fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) (pow.f64 b 3))) (*.f64 -1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))))
(-.f64 (fma.f64 -1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 2))) (sqrt.f64 8))) (*.f64 1/8 (*.f64 (/.f64 y-scale (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (sqrt.f64 8)) (sqrt.f64 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(-.f64 (fma.f64 -1/2 (*.f64 (/.f64 y-scale (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) b) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (*.f64 1/8 (*.f64 (/.f64 y-scale (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (sqrt.f64 8)) (sqrt.f64 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (*.f64 -1/16 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))) (+.f64 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (*.f64 -1/2 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))))
(fma.f64 -1/16 (*.f64 (/.f64 y-scale (pow.f64 b 5)) (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 6) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 5))) (fma.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8))))) (fma.f64 1/8 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 4))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) (pow.f64 b 3))) (*.f64 -1/2 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))))
(fma.f64 -1/16 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) y-scale) (pow.f64 b 5)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 a 6) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))) (-.f64 (fma.f64 -1/2 (*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 2))) (sqrt.f64 8))) (*.f64 1/8 (*.f64 (/.f64 y-scale (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (sqrt.f64 8)) (sqrt.f64 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(fma.f64 -1/16 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) y-scale) (pow.f64 b 5)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 a 6) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))) (-.f64 (fma.f64 -1/2 (*.f64 (/.f64 y-scale (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) b) (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (*.f64 1/8 (*.f64 (/.f64 y-scale (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 a 4) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (sqrt.f64 8)) (sqrt.f64 2))) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))
(*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) 1)
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 1 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (sqrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (sqrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (sqrt.f64 2))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (cbrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (cbrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (cbrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))
(*.f64 (cbrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (cbrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (cbrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))
(*.f64 (pow.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) 1/4) (pow.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) 1/4))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) 1/2) (pow.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) 1/2))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(pow.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) 1/2)
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(pow.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) 1)
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(log.f64 (exp.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(cbrt.f64 (*.f64 2 (*.f64 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))))
(cbrt.f64 (*.f64 2 (*.f64 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))
(cbrt.f64 (*.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(expm1.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(exp.f64 (log.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(log1p.f64 (expm1.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(pow.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))) 1)
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 x-scale (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(log.f64 (exp.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 x-scale (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(cbrt.f64 (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 8 (*.f64 y-scale y-scale))))))
(cbrt.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 2 (*.f64 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (*.f64 8 (*.f64 y-scale y-scale)))))))
(cbrt.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 x-scale (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) 16))))))))
(expm1.f64 (log1p.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 x-scale (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(exp.f64 (log.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 x-scale (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))
(log1p.f64 (expm1.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 x-scale (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))

localize104.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
99.1%
(exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))
98.4%
(exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))
95.5%
(+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3))
90.0%
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
Compiler

Compiled 225 to 194 computations (13.8% saved)

series292.0ms (0.2%)

Counts
4 → 96
Calls

24 calls:

TimeVariablePointExpression
113.0ms
b
@-inf
(exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))
57.0ms
b
@-inf
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
17.0ms
b
@inf
(exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))
15.0ms
y-scale
@0
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
13.0ms
y-scale
@inf
(exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))

rewrite157.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
520×add-sqr-sqrt
502×*-un-lft-identity
498×pow1
488×add-cbrt-cube
488×add-cube-cbrt
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
026298
1550250
26806244
Stop Event
node limit
Counts
4 → 126
Calls
Call 1
Inputs
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
(+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3))
(exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))
(exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))
Outputs
(((-.f64 (exp.f64 (log1p.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (/.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 1 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (sqrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) (sqrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (/.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) (pow.f64 (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 2) (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (/.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (/.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (+.f64 1 (neg.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (/.f64 1 (neg.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (/.f64 1 (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))) (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 2)) (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (-.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2))) (-.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 3))) (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) (-.f64 (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2) (+.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 1) (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 2)) (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) 1) (/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))) (/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 2)) (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (sqrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (pow.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (/.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((neg.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (neg.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((sqrt.f64 (pow.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((log.f64 (exp.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((cbrt.f64 (pow.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((cbrt.f64 (/.f64 (pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((exp.f64 (log.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((-.f64 (exp.f64 (log.f64 (+.f64 0 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((-.f64 (/.f64 1 (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (/.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6) (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((-.f64 (+.f64 -1 (exp.f64 (log1p.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 1 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6)) (/.f64 1 (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 9)) (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2)) (-.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((/.f64 1 (/.f64 (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (-.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((/.f64 1 (/.f64 (+.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 9)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((/.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6)) (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 9)) (+.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((/.f64 (neg.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))) (neg.f64 (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((/.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 9))) (neg.f64 (+.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6) 1) (-.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((sqrt.f64 (pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((log.f64 (exp.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((cbrt.f64 (pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((expm1.f64 (log.f64 (+.f64 0 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((exp.f64 (log.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((exp.f64 (*.f64 (log.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((log1p.f64 (expm1.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((fma.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((fma.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((fma.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((fma.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)))
(((+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((+.f64 1 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((-.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((-.f64 (+.f64 2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (sqrt.f64 (pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2)) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((/.f64 (-.f64 1 (*.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b y-scale)) 2) 1/2)) (-.f64 1 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((/.f64 (+.f64 1 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 3)) (+.f64 1 (-.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b y-scale)) 2) 1/2) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (E.f64) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (exp.f64 2) (/.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((sqrt.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((fabs.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((log.f64 (exp.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((cbrt.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((expm1.f64 (log.f64 (+.f64 2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((log1p.f64 (expm1.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)))
(((+.f64 1 (expm1.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((+.f64 (expm1.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((-.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) (pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) (*.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((*.f64 (*.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2)) (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (E.f64) (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (exp.f64 2) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (exp.f64 (cbrt.f64 (*.f64 4 (pow.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))) 2)))) (cbrt.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (exp.f64 (sqrt.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))) (sqrt.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (pow.f64 (exp.f64 2) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((pow.f64 (pow.f64 (exp.f64 2) (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((sqrt.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((log.f64 (exp.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((cbrt.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((expm1.f64 (log1p.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)) ((log1p.f64 (expm1.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))))) (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))))) #f)))

simplify456.0ms (0.3%)

Algorithm
egg-herbie
Rules
1900×associate-+r+
1442×associate-+l+
894×*-commutative
670×+-commutative
550×associate-*l/
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0126281100
1443379474
Stop Event
node limit
Counts
222 → 413
Calls
Call 1
Inputs
(*.f64 1/3 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b))
(+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (pow.f64 b 2)) (*.f64 1/3 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b)))
(+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8)))))))))))))) (+.f64 (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (pow.f64 b 3)) (+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (pow.f64 b 2)) (*.f64 1/3 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b))))
(+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (pow.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/3072 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/1024 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 -1/512 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 -1/256 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/6144 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/768 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2048 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (*.f64 1/384 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))))))))))))))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8)))))))))))))) (+.f64 (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (+.f64 (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))))))))))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))))) (pow.f64 b 4)) (+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8)))))))))))))) (+.f64 (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (pow.f64 b 3)) (+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (pow.f64 b 2)) (*.f64 1/3 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b)))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))))
(-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 b (sqrt.f64 8))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 b (sqrt.f64 8))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2) b))))
(-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 b (sqrt.f64 8))))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 b (sqrt.f64 8))))))) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 16 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2) (pow.f64 b 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2) b)) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2)))) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 b 2)))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 b (sqrt.f64 8))))))) (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 b (sqrt.f64 8))))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3))))))) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2)))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (/.f64 (*.f64 (-.f64 (*.f64 32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 16 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))))) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 b 3))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 128 (/.f64 1 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))) (*.f64 128 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2) (pow.f64 b 3))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 16 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2) (pow.f64 b 2))) (+.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (*.f64 (-.f64 (*.f64 32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 16 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 b 3))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2) b)) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2)))) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 b 2))))))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (*.f64 -1 (/.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2))) b))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (*.f64 -1 (/.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2))) b))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (sqrt.f64 8)))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2)))) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (pow.f64 b 2))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 -1 (/.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2))) b)) (*.f64 -1 (/.f64 (-.f64 (*.f64 -64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (sqrt.f64 8)))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (pow.f64 (sqrt.f64 8) 2)))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 y-scale (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2)))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (*.f64 16 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))))) (pow.f64 b 3))))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (sqrt.f64 8)))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2)))) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (pow.f64 b 2))))))
(*.f64 1/3 (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))) (pow.f64 y-scale 2)) (*.f64 1/3 (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))
(+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/3 (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (pow.f64 y-scale 3) (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8)))))))))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))
(+.f64 (*.f64 (pow.f64 y-scale 4) (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/768 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2048 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/1024 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/3072 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 -1/256 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/6144 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/96 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3))))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (*.f64 -1/512 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))))))) (pow.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) 2)))))))))))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8)))))))))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (+.f64 (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3))))))))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 1/3 (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))))))))) (+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/3 (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (pow.f64 y-scale 3) (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8)))))))))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))
(-.f64 (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (*.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))
(-.f64 (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))) (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (*.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2)))) (*.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))))
(-.f64 (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))) (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (*.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))))))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))) (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2)))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2)))) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))) (*.f64 (pow.f64 y-scale 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2)))) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (*.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2)))) (*.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (*.f64 -1 (/.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))))
(-.f64 (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (*.f64 -1 (/.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) (*.f64 16 (/.f64 (*.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1)) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))))
(-.f64 (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (*.f64 -1 (/.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (+.f64 (*.f64 -1 (/.f64 (-.f64 (*.f64 -64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (*.f64 16 (/.f64 (*.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1)) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))))) (pow.f64 y-scale 3))) (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) (*.f64 16 (/.f64 (*.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1)) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))))
(*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b)
(+.f64 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b) (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (pow.f64 b 2)))
(+.f64 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))))))))))) (pow.f64 b 3)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b) (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (pow.f64 b 2))))
(+.f64 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))))))))))) (pow.f64 b 3)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b) (+.f64 (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (pow.f64 b 2)) (*.f64 (pow.f64 b 4) (+.f64 (pow.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/3072 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/1024 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 -1/512 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 -1/256 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/6144 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/768 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (*.f64 1/2048 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))))))))))))))))))))
(-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)
(-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) 1)
(-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))) 1)
(-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))) 1)
(-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)
(-.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 -1 (/.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) b))) 1)
(-.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) b)) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) 1)
(-.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (+.f64 (*.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) b)) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))))) 1)
(*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(+.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(+.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (+.f64 (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 y-scale 3) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))))))))))))
(+.f64 (*.f64 (pow.f64 y-scale 4) (+.f64 (pow.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) 2) (+.f64 (*.f64 1/768 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2048 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/1024 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/3072 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/6144 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3))))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 -1/256 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 -1/512 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))))))) (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))))))))))))) (+.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (+.f64 (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 y-scale 3) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8)))))))))))))))
(-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)
(-.f64 (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3))) 1)
(-.f64 (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))))) 1)
(-.f64 (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))))) 1)
(-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1)
(-.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 -1 (/.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) y-scale))) 1)
(-.f64 (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) y-scale)) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) 1)
(-.f64 (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) y-scale)) (+.f64 (*.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))))) 1)
1
(+.f64 1 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))))
(+.f64 1 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (pow.f64 b 2))))
(+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (pow.f64 b 3)) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (pow.f64 b 2)))))
(exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))
1
(+.f64 1 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(+.f64 1 (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))
(+.f64 1 (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 (pow.f64 y-scale 3) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3))))))) (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))
(exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))
1
(+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (pow.f64 b 2)) 1))
(+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (pow.f64 b 2)) (+.f64 1 (*.f64 (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/48 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))))) (pow.f64 b 3)))))
(exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 16 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 2)) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 128 (/.f64 1 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))) (*.f64 128 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 3)) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 16 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 2)) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))))
(exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 16 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 16 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))
1
(+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) 1))
(+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 1 (*.f64 (pow.f64 y-scale 3) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3))))))))))
(exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))
(+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))))
(+.f64 (*.f64 16 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))))))
(+.f64 (*.f64 16 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))))))
(exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 16 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 16 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) 1)
(*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (/.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))
(*.f64 1 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 1)
(*.f64 (sqrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) (sqrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (/.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(*.f64 (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) (pow.f64 (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 2))
(*.f64 (pow.f64 (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 2) (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (/.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(*.f64 (/.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))
(*.f64 (+.f64 1 (neg.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (/.f64 1 (neg.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(*.f64 (/.f64 1 (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))) (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 2)) (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (-.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2))) (-.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 3))) (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) (-.f64 (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2) (+.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))))
(*.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 1) (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))
(*.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 2)) (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) 1) (/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))) (/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 2)) (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(pow.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 1)
(pow.f64 (sqrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 2)
(pow.f64 (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 3)
(pow.f64 (pow.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 3) 1/3)
(pow.f64 (/.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) -1)
(neg.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (neg.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 2))
(log.f64 (exp.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))))
(cbrt.f64 (pow.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 3))
(cbrt.f64 (/.f64 (pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))) 3)))
(expm1.f64 (log1p.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(exp.f64 (log.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 1))
(log1p.f64 (expm1.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2)
(-.f64 (exp.f64 (log.f64 (+.f64 0 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) 1)
(-.f64 (/.f64 1 (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (/.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6) (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(-.f64 (+.f64 -1 (exp.f64 (log1p.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) 1)
(*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 1)
(*.f64 1 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))
(*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(*.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6)) (/.f64 1 (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 9)) (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6)))))
(*.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2)) (-.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2) 1))
(/.f64 1 (/.f64 (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (-.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))))
(/.f64 1 (/.f64 (+.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 9))))
(/.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6)) (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 9)) (+.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))))
(/.f64 (neg.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))) (neg.f64 (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(/.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 9))) (neg.f64 (+.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6) 1) (-.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) -1))
(pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 1)
(pow.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2)
(pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 3)
(pow.f64 (pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 3) 1/3)
(sqrt.f64 (pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 2))
(log.f64 (exp.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(log.f64 (+.f64 1 (expm1.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))))
(cbrt.f64 (pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 3))
(expm1.f64 (log.f64 (+.f64 0 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(exp.f64 (log.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(exp.f64 (*.f64 (log.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 1))
(log1p.f64 (expm1.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(fma.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) -1)
(fma.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) -1)
(fma.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) -1)
(fma.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2) -1)
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)
(+.f64 1 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))
(-.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 0)
(-.f64 (+.f64 2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))) 1)
(*.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 1)
(*.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(*.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(*.f64 (sqrt.f64 (pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2)) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2)))
(/.f64 (-.f64 1 (*.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b y-scale)) 2) 1/2)) (-.f64 1 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 3)) (+.f64 1 (-.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b y-scale)) 2) 1/2) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 1)
(pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) 1/3)
(pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) 1/2)
(pow.f64 (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2)
(pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 3)
(pow.f64 (E.f64) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))
(pow.f64 (exp.f64 2) (/.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))) 2))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(sqrt.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))
(fabs.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))
(log.f64 (exp.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(log.f64 (+.f64 1 (expm1.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))))
(cbrt.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))
(expm1.f64 (log.f64 (+.f64 2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(log1p.f64 (expm1.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(+.f64 1 (expm1.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))))
(+.f64 (expm1.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) 1)
(-.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 1)
(*.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))
(*.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))
(*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) 1)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2))
(*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) (pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) (*.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(*.f64 (*.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2)) (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)
(pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) 1)
(pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 3)
(pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6) 1/3)
(pow.f64 (E.f64) (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(pow.f64 (exp.f64 2) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))
(pow.f64 (exp.f64 (cbrt.f64 (*.f64 4 (pow.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))) 2)))) (cbrt.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))))
(pow.f64 (exp.f64 (sqrt.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))) (sqrt.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))))
(pow.f64 (pow.f64 (exp.f64 2) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(pow.f64 (pow.f64 (exp.f64 2) (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(sqrt.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) 2))
(log.f64 (exp.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))
(log.f64 (+.f64 1 (expm1.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))
(cbrt.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))
(expm1.f64 (log1p.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))
(log1p.f64 (expm1.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))
Outputs
(*.f64 1/3 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b))
(*.f64 1/3 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b))
(+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (pow.f64 b 2)) (*.f64 1/3 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b)))
(fma.f64 (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/8 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16))))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 b b) (*.f64 1/3 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b)))
(fma.f64 (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) -1/32) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 b b) (*.f64 1/3 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b)))
(+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8)))))))))))))) (+.f64 (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (pow.f64 b 3)) (+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (pow.f64 b 2)) (*.f64 1/3 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b))))
(fma.f64 (-.f64 (*.f64 1/3 (fma.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)))) (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) -1/384) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) -1/96) (fma.f64 1/96 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (*.f64 1/2 (+.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0)) (sqrt.f64 8))))))))))) (fma.f64 1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/8 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16)))) (*.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/8 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16))))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))))) (pow.f64 b 3) (fma.f64 (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/8 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16))))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 b b) (*.f64 1/3 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b))))
(fma.f64 (-.f64 (*.f64 1/3 (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0))))) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) -1/384) (*.f64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) -1/96)) (fma.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 1/2 (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0))))))))))) (fma.f64 1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0) (*.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) -1/32) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))))) (pow.f64 b 3) (fma.f64 (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) -1/32) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 b b) (*.f64 1/3 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b))))
(+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (pow.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/3072 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/1024 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 -1/512 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 -1/256 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/6144 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/768 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2048 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (*.f64 1/384 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))))))))))))))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8)))))))))))))) (+.f64 (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (+.f64 (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))))))))))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))))) (pow.f64 b 4)) (+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8)))))))))))))) (+.f64 (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (pow.f64 b 3)) (+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (pow.f64 b 2)) (*.f64 1/3 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b)))))
(fma.f64 (fma.f64 1/3 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0) 2) (fma.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0) (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) -1/384))) (sqrt.f64 8))) (fma.f64 1/3072 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/1024 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 -1/512 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 -1/256 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) -1/384))))) (fma.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/96 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 1/2 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0)) (sqrt.f64 8))) (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) -1/96))))) (fma.f64 1/6144 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/768 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/384 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) 1/2048))))))))))))) (neg.f64 (fma.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (-.f64 (*.f64 1/3 (fma.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)))) (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 1/192 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 -1/64 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 -1/128 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 1/192 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 1/96 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (*.f64 1/2 (+.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0)) (sqrt.f64 8))))))))))))) (fma.f64 1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/8 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16)))) (*.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/8 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16))))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))))) (fma.f64 1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/96 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 1/192 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) -1/96) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) -1/128)))))) (*.f64 1/3 (*.f64 (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/8 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16))))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (fma.f64 1/8 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16))))))))) (pow.f64 b 4) (fma.f64 (-.f64 (*.f64 1/3 (fma.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)))) (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) -1/384) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) -1/96) (fma.f64 1/96 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (*.f64 1/2 (+.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0)) (sqrt.f64 8))))))))))) (fma.f64 1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/8 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16)))) (*.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/8 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16))))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))))) (pow.f64 b 3) (fma.f64 (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/8 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16))))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 b b) (*.f64 1/3 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b)))))
(fma.f64 (-.f64 (*.f64 1/3 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0) 2) (fma.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0) (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) -1/384))))) (fma.f64 1/3072 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/1024 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 -1/512 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 -1/256 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) -1/384))))) (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (fma.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0)))) (*.f64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) -1/96)))))) (fma.f64 1/6144 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/768 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/384 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) 1/2048)))))))))))))) (fma.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (-.f64 (*.f64 1/3 (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0))))) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) -1/384) (*.f64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) -1/96)) (fma.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 1/2 (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0))))))))))) (fma.f64 1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0) (*.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) -1/32) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))))) (fma.f64 1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) (+.f64 (*.f64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) -1/96) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) -1/384))))) (*.f64 1/3 (*.f64 (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) -1/32) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0) (*.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (pow.f64 b 4) (fma.f64 (-.f64 (*.f64 1/3 (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0))))) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) -1/384) (*.f64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) -1/96)) (fma.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 1/2 (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0))))))))))) (fma.f64 1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0) (*.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 1/3 (*.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) -1/32) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))))) (pow.f64 b 3) (fma.f64 (+.f64 (*.f64 1/3 (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) -1/32) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)))))) (*.f64 -1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 b b) (*.f64 1/3 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b)))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))
(-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 b (sqrt.f64 8))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 b (sqrt.f64 8))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2) b))))
(-.f64 (fma.f64 4 (/.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (sqrt.f64 2)) (*.f64 (*.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (*.f64 (sqrt.f64 8) b))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (*.f64 8 (/.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) y-scale) (*.f64 (*.f64 (sqrt.f64 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (*.f64 (sqrt.f64 8) b)))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) b))))
(-.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (*.f64 (sqrt.f64 8) b))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (*.f64 (sqrt.f64 8) b))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 4) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) b))))
(-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 b (sqrt.f64 8))))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 b (sqrt.f64 8))))))) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 16 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2) (pow.f64 b 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2) b)) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2)))) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 b 2)))))))
(+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (-.f64 (fma.f64 4 (/.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (sqrt.f64 2)) (*.f64 (*.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (*.f64 (sqrt.f64 8) b))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))) (fma.f64 8 (/.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) y-scale) (*.f64 (*.f64 (sqrt.f64 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (*.f64 (sqrt.f64 8) b))) (/.f64 (*.f64 16 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (+.f64 (+.f64 (*.f64 (/.f64 (-.f64 (/.f64 32 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))) (*.f64 b b))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) b))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))) (*.f64 8 (/.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) y-scale) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))))) (/.f64 (fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1)))) (*.f64 b b)))))))
(-.f64 (-.f64 (+.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (*.f64 (sqrt.f64 8) b))))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))))) (fma.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (*.f64 (sqrt.f64 8) b)))) (/.f64 (*.f64 16 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3)) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))))))) (/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))) (+.f64 (*.f64 (/.f64 (+.f64 (/.f64 32 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 -16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))) (*.f64 b b))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 4) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) b)))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 4) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))))))) (/.f64 (fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1)))) (*.f64 b b))))
(-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 b (sqrt.f64 8))))))) (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 b (sqrt.f64 8))))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3))))))) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2)))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))) (/.f64 (*.f64 (-.f64 (*.f64 32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 16 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))))) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 b 3))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 128 (/.f64 1 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))) (*.f64 128 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2) (pow.f64 b 3))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 16 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2) (pow.f64 b 2))) (+.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (*.f64 (-.f64 (*.f64 32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 16 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 b 3))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2) b)) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2)))) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) (pow.f64 b 2))))))))))
(-.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (fma.f64 4 (/.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (sqrt.f64 2)) (*.f64 (*.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (*.f64 (sqrt.f64 8) b))) (fma.f64 8 (/.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) y-scale) (*.f64 (*.f64 (sqrt.f64 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (*.f64 (sqrt.f64 8) b))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))) (fma.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))))) (/.f64 (*.f64 16 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))))))))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))) (+.f64 (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))) 48) (+.f64 (/.f64 (fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (-.f64 (fma.f64 4 (/.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) y-scale) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))) (/.f64 (*.f64 8 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3)) (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))))) (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1)))))) (/.f64 (-.f64 (/.f64 32 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2) (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))) (pow.f64 b 3))) (+.f64 (+.f64 (*.f64 (/.f64 (-.f64 (/.f64 128 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3))) (/.f64 128 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))) (pow.f64 b 3))) (*.f64 (/.f64 (-.f64 (/.f64 32 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))) (*.f64 b b)))) (+.f64 (+.f64 (*.f64 (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))) (*.f64 8 (/.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) y-scale) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))))) (/.f64 (fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1)))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (-.f64 (/.f64 32 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2))))) (pow.f64 b 3))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) b))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))) (*.f64 8 (/.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) y-scale) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))))) (/.f64 (fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1)))) (*.f64 b b)))))))
(-.f64 (+.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (*.f64 (sqrt.f64 8) b))))) (fma.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (*.f64 (sqrt.f64 8) b)))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))))) (fma.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3)))))) (/.f64 (*.f64 16 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3)) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))))))))) (/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))) (+.f64 (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 4) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) 48) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))))) (+.f64 (/.f64 (fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))))) (/.f64 (*.f64 8 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3)) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))))) (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 4) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1)))))) (/.f64 (+.f64 (/.f64 32 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 -16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2) (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))) (pow.f64 b 3))) (+.f64 (*.f64 (/.f64 (+.f64 (/.f64 32 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 -16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))) (*.f64 b b))) (+.f64 (+.f64 (+.f64 (*.f64 (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))))))) (/.f64 (fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1)))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 (/.f64 32 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 -16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2)))))) (pow.f64 b 3))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 4) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) b))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 4) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))))))) (/.f64 (fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1)))) (*.f64 b b)))) (*.f64 (/.f64 (+.f64 (/.f64 128 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (/.f64 -128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))) (pow.f64 b 3)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) -1) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) -1) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (*.f64 -1 (/.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2))) b))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))))
(+.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (-.f64 (neg.f64 (/.f64 (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (/.f64 (*.f64 -4 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3)) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (/.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) -1)))) b)) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))) (/.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) -1)))) b)) (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) -1) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (*.f64 -1 (/.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2))) b))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (sqrt.f64 8)))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2)))) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (pow.f64 b 2))))))
(+.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (-.f64 (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (/.f64 (*.f64 -4 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3)) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (/.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) -1)))) b)))) (fma.f64 16 (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) -1) (/.f64 (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (*.f64 (/.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (/.f64 (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (*.f64 -4 (/.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (sqrt.f64 2)) (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))))) (/.f64 (fma.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) -1)))) (*.f64 b b)))))))
(+.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))) (-.f64 (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))) (/.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) -1)))) b)))) (fma.f64 16 (*.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) -1) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))) 2)) (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))) (*.f64 (/.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))) (/.f64 (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))))) (/.f64 (fma.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) -1)))) (*.f64 b b)))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 -1 (/.f64 (-.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2))) b)) (*.f64 -1 (/.f64 (-.f64 (*.f64 -64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (sqrt.f64 8)))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (pow.f64 (sqrt.f64 8) 2)))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 y-scale (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2)))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (*.f64 16 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))))) (pow.f64 b 3))))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (sqrt.f64 8)))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (sqrt.f64 8))))))) (/.f64 (*.f64 (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) 2)))) (*.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (pow.f64 b 2))))))
(+.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (-.f64 (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (*.f64 -1 (+.f64 (/.f64 (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (/.f64 (*.f64 -4 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3)) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (/.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) -1)))) b) (/.f64 (-.f64 (/.f64 (*.f64 -64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (fma.f64 16 (*.f64 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (*.f64 -4 (/.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (sqrt.f64 2)) (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))))) (/.f64 (fma.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) -1)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))))) (/.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) 48) (+.f64 (/.f64 (fma.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (-.f64 (fma.f64 -4 (/.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) y-scale) (*.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))) (*.f64 -8 (/.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (sqrt.f64 2)) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))))) (/.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) -1)))))) (*.f64 16 (*.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) -1) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) 2))))))))))) (pow.f64 b 3)))))) (fma.f64 16 (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) -1) (/.f64 (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (*.f64 (/.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))) (/.f64 (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))) (*.f64 -4 (/.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (sqrt.f64 2)) (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))))) (/.f64 (fma.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) -1)))) (*.f64 b b)))))))
(+.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))) (-.f64 (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))) (fma.f64 -1 (/.f64 (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))) (/.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) -1)))) b) (neg.f64 (/.f64 (-.f64 (*.f64 -64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))))) (fma.f64 16 (*.f64 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))))) (/.f64 (fma.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) -1)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))) (/.f64 (*.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (-.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (pow.f64 (sqrt.f64 2) 2)) 48) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (-.f64 (fma.f64 -4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))))))) (/.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) -1))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))) (*.f64 16 (*.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) -1) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))) 2)))))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))))) (pow.f64 b 3)))))) (fma.f64 16 (*.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) -1) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))) 2)) (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))) (*.f64 (/.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))) (/.f64 (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))))))))) (/.f64 (fma.f64 -4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))) 2) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) -1)))) (*.f64 b b)))))))
(*.f64 1/3 (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(*.f64 (*.f64 1/3 y-scale) (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4))
(*.f64 1/3 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4)))
(+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))) (pow.f64 y-scale 2)) (*.f64 1/3 (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))
(fma.f64 (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) 2))) (*.f64 y-scale y-scale) (*.f64 (*.f64 1/3 y-scale) (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4)))
(fma.f64 (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) 2))) (*.f64 y-scale y-scale) (*.f64 1/3 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4))))
(+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/3 (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (pow.f64 y-scale 3) (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8)))))))))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))
(fma.f64 (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) 2))) (*.f64 y-scale y-scale) (fma.f64 1/3 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4)) (*.f64 (pow.f64 y-scale 3) (fma.f64 1/3 (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 1/4 (sqrt.f64 2)) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16))))))))) (neg.f64 (fma.f64 1/3 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) 2)))) (*.f64 1/9 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 5/32)))))))))))
(fma.f64 (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) 2))) (*.f64 y-scale y-scale) (fma.f64 1/3 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4)) (*.f64 (pow.f64 y-scale 3) (fma.f64 1/3 (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (fma.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16)))))))))) (neg.f64 (fma.f64 1/3 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) 2)))) (*.f64 1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16))))))))))
(+.f64 (*.f64 (pow.f64 y-scale 4) (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/768 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2048 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/1024 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/3072 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 -1/256 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/6144 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/96 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3))))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (*.f64 -1/512 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))))))) (pow.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) 2)))))))))))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8)))))))))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (+.f64 (*.f64 1/9 (*.f64 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3))))))))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 1/3 (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))))))))) (+.f64 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))) (pow.f64 y-scale 2)) (+.f64 (*.f64 1/3 (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (pow.f64 y-scale 3) (-.f64 (*.f64 1/3 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8)))))))))))) (+.f64 (*.f64 1/3 (*.f64 (-.f64 (*.f64 1/3 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 1/9 (pow.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 2))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 1/9 (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))
(fma.f64 (pow.f64 y-scale 4) (fma.f64 1/3 (fma.f64 1/768 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/2048 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/1024 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/3072 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 -1/256 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/6144 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/192)))) (sqrt.f64 8))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) 1/128)))) (fma.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0) (fma.f64 -1/512 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/384)))) (pow.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0) 2))))))))))))) (neg.f64 (fma.f64 1/3 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) (fma.f64 1/3 (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 1/4 (sqrt.f64 2)) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16))))))))) (neg.f64 (fma.f64 1/3 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) 2)))) (*.f64 1/9 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 5/32))))))))) (fma.f64 1/9 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/48)))))) (*.f64 1/3 (*.f64 (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) 2))) (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 5/32))))))))) (fma.f64 (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) 2))) (*.f64 y-scale y-scale) (fma.f64 1/3 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4)) (*.f64 (pow.f64 y-scale 3) (fma.f64 1/3 (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 1/4 (sqrt.f64 2)) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16))))))))) (neg.f64 (fma.f64 1/3 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) 2)))) (*.f64 1/9 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 5/32))))))))))))
(fma.f64 (pow.f64 y-scale 4) (fma.f64 1/3 (fma.f64 1/768 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/2048 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/1024 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/3072 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 -1/256 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/6144 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (fma.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/192)))))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/384))))) (fma.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0) (fma.f64 -1/512 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/384))))) (pow.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0) 2))))))))))))) (neg.f64 (fma.f64 1/3 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) (fma.f64 1/3 (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (fma.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16)))))))))) (neg.f64 (fma.f64 1/3 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) 2)))) (*.f64 1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16)))))))) (fma.f64 1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/48)))))) (*.f64 (*.f64 1/3 (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16))) (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) 2)))))))) (fma.f64 (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) 2))) (*.f64 y-scale y-scale) (fma.f64 1/3 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4)) (*.f64 (pow.f64 y-scale 3) (fma.f64 1/3 (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (fma.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16)))))))))) (neg.f64 (fma.f64 1/3 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) (+.f64 (*.f64 1/3 (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (*.f64 -1/9 (pow.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) 2)))) (*.f64 1/9 (*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16)))))))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) -1) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) -1) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))
(-.f64 (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (*.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))
(-.f64 (fma.f64 8 (/.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) y-scale) (*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) (fma.f64 4 (/.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) y-scale) (*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) (+.f64 (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))) y-scale) (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) -1) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) 2))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))))))
(-.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))))))) (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))))))) (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))))) (+.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) -1) (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))) 2))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))))
(-.f64 (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))) (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (*.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2)))) (*.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))))
(-.f64 (fma.f64 8 (/.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) y-scale) (*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) (*.f64 4 (/.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) y-scale) (*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))))))))))) (fma.f64 16 (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) -1) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) 2))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) (+.f64 (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))) y-scale) (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) -1) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))) (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) 12) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) -1) (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) 2))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))))))
(-.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))))))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))))) (/.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) y-scale)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))))))))) (fma.f64 16 (*.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) -1) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))) 2))))) (+.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) -1) (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))) 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))) (*.f64 y-scale y-scale)) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) 12) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))))) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) -1) (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))) 2))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))))))))
(-.f64 (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))) (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (*.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))))))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))) (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2)))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2)))) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))) (*.f64 (pow.f64 y-scale 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2)))) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (*.f64 (pow.f64 (sqrt.f64 8) 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (*.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))) (/.f64 (*.f64 (+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))) 2)))) (*.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))))))))
(-.f64 (fma.f64 8 (/.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) y-scale) (*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) (fma.f64 4 (/.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) y-scale) (*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) (/.f64 (*.f64 64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3)) (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))))))))))) (fma.f64 16 (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) -1) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) 2))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) (+.f64 (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))) (pow.f64 y-scale 3)) (/.f64 (-.f64 (*.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))))) 48) (fma.f64 16 (*.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) -1) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) 2)))) (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) 12) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) -1) (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) 2))))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))))) (fma.f64 16 (*.f64 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 y-scale 3)) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) 12) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) -1) (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) 2))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))))))) (+.f64 (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))) y-scale) (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) -1) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))) (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))) 12) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) -1) (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) 2))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))))))))))
(-.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))))))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))))) (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))))))) (*.f64 64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))))))))))))) (fma.f64 16 (*.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) -1) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))) 2))))) (+.f64 (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))) (pow.f64 y-scale 3)) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) 48) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))))) (fma.f64 16 (*.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) -1) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))) 2)))) (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) 12) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))))) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) -1) (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))) 2))))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))) (fma.f64 16 (*.f64 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 y-scale 3)) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) 12) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))))) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) -1) (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))) 2))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))))) (+.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) -1) (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))) 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))) (*.f64 (/.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))) (*.f64 y-scale y-scale)) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) 12) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))))) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) -1) (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))) 2))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))))))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (*.f64 -1 (/.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))))
(+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (sqrt.f64 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (*.f64 (sqrt.f64 8) b))) -12) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -12) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))
(-.f64 (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (*.f64 -1 (/.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) (*.f64 16 (/.f64 (*.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1)) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))))
(-.f64 (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (fma.f64 -1 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (sqrt.f64 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (*.f64 (sqrt.f64 8) b))) -12) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale) (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (sqrt.f64 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (*.f64 (sqrt.f64 8) b))) -12) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))) (/.f64 (*.f64 16 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2)))))))
(-.f64 (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (fma.f64 -1 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -12) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale) (/.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -12) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))) (*.f64 16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1)))))))
(-.f64 (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (*.f64 -1 (/.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (+.f64 (*.f64 -1 (/.f64 (-.f64 (*.f64 -64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (+.f64 (*.f64 16 (/.f64 (*.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2)))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (*.f64 16 (/.f64 (*.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1)) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))))) (pow.f64 y-scale 3))) (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8)))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 b (sqrt.f64 8))))))) (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (*.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) (*.f64 16 (/.f64 (*.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1)) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))))
(-.f64 (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (fma.f64 -1 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (sqrt.f64 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (*.f64 (sqrt.f64 8) b))) -12) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale) (fma.f64 -1 (/.f64 (-.f64 (*.f64 -64 (/.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (pow.f64 (sqrt.f64 2) 3)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (fma.f64 16 (*.f64 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (sqrt.f64 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (*.f64 (sqrt.f64 8) b))) -12) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (/.f64 (-.f64 (-.f64 (*.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))) 48) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (sqrt.f64 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (*.f64 (sqrt.f64 8) b))) -12) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) (*.f64 16 (/.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))) (pow.f64 y-scale 3)) (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (sqrt.f64 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (*.f64 (sqrt.f64 8) b))) -12) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))) (/.f64 (*.f64 16 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2)))))))
(-.f64 (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (fma.f64 -1 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -12) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale) (fma.f64 -1 (/.f64 (-.f64 (*.f64 -64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (/.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -12) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))))) (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (pow.f64 (sqrt.f64 2) 2)) 48) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -12) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))) (*.f64 16 (*.f64 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2)))))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))) (pow.f64 y-scale 3)) (/.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -12) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (/.f64 (*.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 -4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))) (*.f64 16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1)))))))
(*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b)
(*.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b)
(+.f64 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b) (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (pow.f64 b 2)))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b (*.f64 (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/8 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16)))))) (*.f64 b b)))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b (*.f64 (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) -1/32) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0))))) (*.f64 b b)))
(+.f64 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))))))))))) (pow.f64 b 3)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b) (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (pow.f64 b 2))))
(fma.f64 (fma.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)))) (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 1/192 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 -1/64 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 -1/128 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 1/192 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 1/96 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (*.f64 1/2 (+.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0)) (sqrt.f64 8)))))))))))) (pow.f64 b 3) (fma.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b (*.f64 (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/8 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16)))))) (*.f64 b b))))
(fma.f64 (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0))))) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) -1/384) (*.f64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) -1/96)) (fma.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 1/2 (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0)))))))))) (pow.f64 b 3) (fma.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b (*.f64 (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) -1/32) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0))))) (*.f64 b b))))
(+.f64 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))))))))))) (pow.f64 b 3)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b) (+.f64 (*.f64 (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))))) (pow.f64 b 2)) (*.f64 (pow.f64 b 4) (+.f64 (pow.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/3072 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/1024 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 -1/512 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 -1/256 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/6144 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (sqrt.f64 8))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))))) (sqrt.f64 8))))) (+.f64 (*.f64 1/768 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4)))) (*.f64 1/2048 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))))))))))))))))))))
(fma.f64 (fma.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)))) (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 1/192 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 -1/64 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 -1/128 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 1/192 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 1/96 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (*.f64 1/2 (+.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0)) (sqrt.f64 8))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0)) (sqrt.f64 8)))))))))))) (pow.f64 b 3) (fma.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b (fma.f64 (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/8 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 -1/32 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) -1/16)))))) (*.f64 b b) (*.f64 (pow.f64 b 4) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0) 2) (fma.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0) (fma.f64 1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) -1/384))) (sqrt.f64 8))) (fma.f64 1/3072 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/1024 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 -1/512 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 -1/256 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) -1/384))))) (fma.f64 1/6144 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (sqrt.f64 8) (fma.f64 1/96 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (fma.f64 1/2 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0)) (sqrt.f64 8))) (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) -1/96))))) (fma.f64 1/768 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/384 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) 1/2048)))))))))))))))))
(fma.f64 (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0))))) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) (+.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) -1/384) (*.f64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) -1/96)) (fma.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 1/2 (+.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0)))))))))) (pow.f64 b 3) (fma.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) 3/4) b (fma.f64 (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (fma.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (+.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) -1/32) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0))))) (*.f64 b b) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0) 2) (fma.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0) (fma.f64 1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) 0)) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) -1/384))))) (fma.f64 1/3072 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/1024 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 -1/512 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 -1/256 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) -1/384))))) (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (fma.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0)))) (*.f64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) -1/96)))))) (fma.f64 1/6144 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/768 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) (fma.f64 1/384 (*.f64 (pow.f64 y-scale 4) (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 (sqrt.f64 8) 4))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 y-scale 4) (pow.f64 (sqrt.f64 8) 4))) 1/2048))))))))))))) (pow.f64 b 4)))))
(-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) 1)
(+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) -1)
(-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) 1)
(+.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (/.f64 (*.f64 8 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3)) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) -1)
(+.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))) -1)
(-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))))) 1)
(+.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (/.f64 (*.f64 8 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3)) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))) -1)
(+.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))))) -1)
(-.f64 (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (+.f64 (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))) 1)
(+.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (fma.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (/.f64 (*.f64 8 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3)) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))))) -1)
(+.f64 (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (fma.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 b 3)) (pow.f64 (sqrt.f64 8) 3)))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))))) -1)
(-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) 1)
(+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) -1)
(+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) -1)
(-.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 -1 (/.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) b))) 1)
(+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (-.f64 (neg.f64 (/.f64 (fma.f64 -4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (/.f64 (*.f64 -8 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3)) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b)) 1))
(+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (+.f64 (neg.f64 (/.f64 (fma.f64 -4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) b)) -1))
(-.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) b)) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) 1)
(+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (-.f64 (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))) (fma.f64 -1 (/.f64 (fma.f64 -4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (/.f64 (*.f64 -8 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3)) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))))) 1))
(+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (-.f64 (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))) (fma.f64 -1 (/.f64 (fma.f64 -4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) b) (/.f64 (*.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) 16) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))))) 1))
(-.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (+.f64 (*.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) b)) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))))) 1)
(+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (-.f64 (fma.f64 64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))) (fma.f64 -1 (/.f64 (fma.f64 -4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (/.f64 (*.f64 -8 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3)) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))) b) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))))))) 1))
(+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (-.f64 (fma.f64 64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 b 3)) (pow.f64 (sqrt.f64 8) 3)))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))) (fma.f64 -1 (/.f64 (fma.f64 -4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))) b) (/.f64 (*.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) 3) 16) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))))))) 1))
(*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4))
(+.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(fma.f64 (*.f64 y-scale y-scale) (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4)))
(fma.f64 (*.f64 y-scale y-scale) (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4)))
(+.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (+.f64 (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 y-scale 3) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))))))))))))
(fma.f64 (*.f64 y-scale y-scale) (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) (*.f64 (pow.f64 y-scale 3) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 1/4 (sqrt.f64 2)) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16))))))))))))
(fma.f64 (*.f64 y-scale y-scale) (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) (*.f64 (pow.f64 y-scale 3) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (fma.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16)))))))))))))
(+.f64 (*.f64 (pow.f64 y-scale 4) (+.f64 (pow.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) 2) (+.f64 (*.f64 1/768 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2048 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/1024 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/3072 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/6144 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3))))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 -1/256 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 -1/512 (*.f64 (pow.f64 (sqrt.f64 2) 4) (*.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 8) 4)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))))))) (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))))))))))))) (+.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))) (+.f64 (*.f64 y-scale (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (*.f64 (pow.f64 y-scale 3) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) (+.f64 (*.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 b (sqrt.f64 8)))))))))))))))
(fma.f64 (pow.f64 y-scale 4) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0) 2) (fma.f64 1/768 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/2048 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/1024 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/3072 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/6144 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) (fma.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/192)))) (*.f64 (sqrt.f64 8) b)) (fma.f64 -1/256 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) 1/128)))) (fma.f64 -1/512 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/384)))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16)))))))))))))) (fma.f64 (*.f64 y-scale y-scale) (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)) 3/4) (*.f64 (pow.f64 y-scale 3) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 1/4 (sqrt.f64 2)) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16)))))))))))))
(fma.f64 (pow.f64 y-scale 4) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0) 2) (fma.f64 1/768 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/2048 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/1024 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/3072 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/6144 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (fma.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/192))))) (fma.f64 -1/256 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/384))))) (fma.f64 -1/512 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 4) (pow.f64 b 4)) (pow.f64 (sqrt.f64 8) 4)) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/384))))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16)))))))))))))) (fma.f64 (*.f64 y-scale y-scale) (fma.f64 -1/16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (fma.f64 1/4 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)) 3/4) (*.f64 (pow.f64 y-scale 3) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (fma.f64 1/2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))) (fma.f64 -1/64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16))))))))))))))
(-.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) 1)
(+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) -1)
(+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) -1)
(-.f64 (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3))) 1)
(+.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3))) -1)
(+.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3))) -1)
(-.f64 (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))))) 1)
(+.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2))))))))) -1)
(+.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (/.f64 (*.f64 16 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))))))) -1)
(-.f64 (+.f64 (*.f64 8 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 4 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))))) 1)
(+.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (fma.f64 64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))))))))) -1)
(+.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (fma.f64 4 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (fma.f64 64 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 b 3)) (pow.f64 (sqrt.f64 8) 3)))) (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3) (/.f64 (*.f64 16 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) 3)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2))))))))) -1)
(-.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) 1)
(+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1)
(+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1)
(-.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 -1 (/.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) y-scale))) 1)
(+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (-.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) -12) y-scale)) 1))
(+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (-.f64 (neg.f64 (/.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -12) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) y-scale)) 1))
(-.f64 (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) y-scale)) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))) 1)
(+.f64 (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (fma.f64 -1 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) -12) y-scale) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))))))) -1)
(+.f64 (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (fma.f64 -1 (/.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -12) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) y-scale) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))))))) -1)
(-.f64 (+.f64 (*.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (+.f64 (*.f64 -1 (/.f64 (+.f64 (*.f64 -8 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -4 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) y-scale)) (+.f64 (*.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))))) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))))) 1)
(+.f64 (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (fma.f64 -1 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) -12) y-scale) (fma.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))))) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2))))))))) -1)
(+.f64 (fma.f64 32 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (fma.f64 -1 (/.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -12) (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) y-scale) (fma.f64 64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 b 3)) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2))))))))) -1)
1
(+.f64 1 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))))
(+.f64 1 (*.f64 (*.f64 1/4 (sqrt.f64 2)) (*.f64 (*.f64 y-scale b) (sqrt.f64 8))))
(+.f64 1 (*.f64 (*.f64 1/4 (sqrt.f64 2)) (*.f64 y-scale (*.f64 (sqrt.f64 8) b))))
(+.f64 1 (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (pow.f64 b 2))))
(+.f64 1 (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0))))
(+.f64 1 (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0))))
(+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (pow.f64 b 3)) (+.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))) (*.f64 (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2))))) (pow.f64 b 2)))))
(+.f64 1 (fma.f64 (fma.f64 1/384 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)) -1/384)) (pow.f64 b 3) (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)) 0)))))
(+.f64 1 (fma.f64 (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3))) -1/384)) (pow.f64 b 3) (fma.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))) 0)))))
(exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))
(exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 4) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 4) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))
(+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) 4) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))
(exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))
(fma.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))
(fma.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))
(fma.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))
(fma.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))
(fma.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))
(fma.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))
1
(+.f64 1 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(+.f64 1 (*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))
(+.f64 1 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))
(+.f64 1 (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2))))))))
(+.f64 1 (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))))
(+.f64 1 (fma.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0))))
(+.f64 1 (+.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 (pow.f64 y-scale 3) (+.f64 (*.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/192 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3))))))) (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))))))
(+.f64 1 (fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (fma.f64 (pow.f64 y-scale 3) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/384)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))))
(+.f64 1 (fma.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (fma.f64 (pow.f64 y-scale 3) (fma.f64 1/384 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/384)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 0)))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))
(exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))
(exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))
(fma.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))
(fma.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))
(fma.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))
(fma.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))
(fma.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))))
(fma.f64 4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))))
(exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))
(exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))
(exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))
(fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))
(fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))
(fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))
(fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))
(+.f64 (*.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))
(fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))
(fma.f64 4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))
1
(+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(fma.f64 1/2 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) 1)
(fma.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) 1)
(+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (pow.f64 b 2)) 1))
(fma.f64 1/2 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (fma.f64 (*.f64 (*.f64 1/16 (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (*.f64 b b) 1))
(fma.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (fma.f64 (*.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 b b) 1))
(+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 -1/16 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (pow.f64 b 2)) (+.f64 1 (*.f64 (+.f64 (*.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 -1/32 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 1/48 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))))) (pow.f64 b 3)))))
(fma.f64 1/2 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (+.f64 (fma.f64 (*.f64 (*.f64 1/16 (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))) (*.f64 b b) 1) (*.f64 (pow.f64 b 3) (fma.f64 1/96 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) (*.f64 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3)) -1/96)))))
(+.f64 (fma.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (fma.f64 (*.f64 1/16 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 b b) 1)) (*.f64 (pow.f64 b 3) (fma.f64 1/96 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) (*.f64 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))) -1/96))))
(exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))
(pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 16 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 2)) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (-.f64 (/.f64 32 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 (*.f64 b b) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (+.f64 (/.f64 32 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 -16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))))) (/.f64 (*.f64 b b) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 128 (/.f64 1 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3))))) (*.f64 128 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 3)) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2))))) (*.f64 16 (/.f64 1 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 2)) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 1 b)))))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (+.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (-.f64 (/.f64 32 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 16 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 (*.f64 b b) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))) (/.f64 (-.f64 (/.f64 128 (*.f64 (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 2) 3)) (pow.f64 (sqrt.f64 8) 3))) (/.f64 128 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 y-scale 3)) (pow.f64 (sqrt.f64 8) 3)))) (/.f64 (pow.f64 b 3) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b)))))))))
(+.f64 (fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (+.f64 (/.f64 32 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (sqrt.f64 8) 2)))) (/.f64 -16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sqrt.f64 8) 2))))) (/.f64 (*.f64 b b) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 (/.f64 128 (*.f64 (pow.f64 y-scale 3) (*.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 (sqrt.f64 8) 3)))) (/.f64 -128 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 y-scale 3) (pow.f64 (sqrt.f64 8) 3)))))) (pow.f64 b 3)))
(exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))
(pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 16 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 16 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))))) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8)))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 -1/4 y-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) -1/4))))))
1
(+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1)
(fma.f64 1/2 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) 1)
(fma.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) 1)
(+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) 1))
(fma.f64 1/2 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (fma.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16) 1))
(fma.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (fma.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16) 1))
(+.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 (pow.f64 y-scale 2) (+.f64 (*.f64 -1/16 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))) (*.f64 1/8 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 1 (*.f64 (pow.f64 y-scale 3) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (+.f64 (*.f64 1/96 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3)))) (*.f64 -1/32 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 b 3) (pow.f64 (sqrt.f64 8) 3))))))))))
(fma.f64 1/2 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (+.f64 (fma.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16) 1) (*.f64 (pow.f64 y-scale 3) (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/48)))))
(+.f64 (fma.f64 1/2 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))) (fma.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 b b)) (pow.f64 (sqrt.f64 8) 2)) 1/16) 1)) (*.f64 (pow.f64 y-scale 3) (fma.f64 1/48 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 3) (*.f64 (pow.f64 (sqrt.f64 8) 3) (pow.f64 b 3))) -1/48))))
(exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))
(pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8))))))
(pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))))
(+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))))
(+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8))))))
(+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b))))))
(+.f64 (*.f64 16 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))))))
(fma.f64 16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))))))
(fma.f64 16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))))))
(+.f64 (*.f64 16 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (+.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))))))
(fma.f64 16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))))))
(fma.f64 16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 8 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))))))
(exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))
(pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))
(pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 16 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))
(+.f64 (*.f64 8 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))) (+.f64 (*.f64 16 (/.f64 (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (pow.f64 y-scale 2) (*.f64 (pow.f64 b 2) (pow.f64 (sqrt.f64 8) 2)))))) (exp.f64 (*.f64 2 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b)))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))
(fma.f64 8 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (sqrt.f64 8) b)))) (fma.f64 16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 (pow.f64 (sqrt.f64 2) 2) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sqrt.f64 8) 2) (*.f64 b b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b)))) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))) 1)
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (/.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(*.f64 1 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 1)
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(*.f64 (sqrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) (sqrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (/.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(*.f64 (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) (pow.f64 (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 2))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(*.f64 (pow.f64 (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 2) (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (/.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(*.f64 (/.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(*.f64 (+.f64 1 (neg.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (/.f64 1 (neg.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(/.f64 (*.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) 1) (neg.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)))))
(*.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (/.f64 1 (neg.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))))
(*.f64 (/.f64 1 (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))) (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))))
(*.f64 (/.f64 1 (hypot.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)))) (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (hypot.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (hypot.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)))) (hypot.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1))))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 2)) (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)))) 2)) (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)))) 2)) (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (-.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2))) (-.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (-.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2) (pow.f64 (pow.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) 2) 2))) (-.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2)))) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 3))) (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) (-.f64 (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2) (+.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3) (pow.f64 (pow.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) 2) 3))) (-.f64 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2) (pow.f64 (pow.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) 2) 2)) (+.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3) (pow.f64 (pow.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) 2) 3))) (-.f64 (pow.f64 (pow.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) 2) 2) (-.f64 (+.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(*.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 1) (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(*.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 2)) (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)))) 2)) (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)))) 2)) (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) 1) (/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))) (/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))))
(*.f64 (/.f64 1 (hypot.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)))) (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (hypot.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (hypot.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)))) (hypot.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 2)) (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(*.f64 (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))) (/.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))) 2) (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)))) 2)))
(pow.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 1)
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(pow.f64 (sqrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 2)
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(pow.f64 (cbrt.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 3)
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(pow.f64 (pow.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 3) 1/3)
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(pow.f64 (/.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) -1)
(/.f64 1 (/.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))) (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))))
(neg.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (neg.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(/.f64 (neg.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))) (neg.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)))))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 2))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)))) 2))
(log.f64 (exp.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(cbrt.f64 (pow.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))) 3))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(cbrt.f64 (/.f64 (pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))) 3)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(expm1.f64 (log1p.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(exp.f64 (log.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))) 1))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(log1p.f64 (expm1.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) (+.f64 2 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))))
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2)
(+.f64 (exp.f64 (log1p.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))) -2)
(-.f64 (exp.f64 (log.f64 (+.f64 0 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) 1)
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(-.f64 (/.f64 1 (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (/.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6) (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6)) (-.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)))
(-.f64 (+.f64 -1 (exp.f64 (log1p.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))) 1)
(+.f64 (exp.f64 (log1p.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))) -2)
(*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 1)
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(*.f64 1 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2))
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(*.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6)) (/.f64 1 (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(/.f64 (*.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6)) 1) (-.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)))
(*.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 9)) (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6)))))
(*.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 9)) (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6)))))
(*.f64 (+.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2)) (-.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2) 1))
(*.f64 (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3/2)) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3/2) -1))
(/.f64 1 (/.f64 (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (-.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))))
(/.f64 (*.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6)) 1) (-.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)))
(/.f64 1 (/.f64 (+.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 9))))
(*.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 9)) (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6)))))
(/.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6)) (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6)) (-.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 9)) (+.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 9)) (+.f64 1 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6))))
(/.f64 (neg.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))) (neg.f64 (-.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(/.f64 (neg.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6))) (neg.f64 (-.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6)) (+.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)))
(/.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 9))) (neg.f64 (+.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6)))))
(/.f64 (+.f64 1 (neg.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 9))) (+.f64 -1 (neg.f64 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6)))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 9)) (-.f64 -1 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6) 1) (-.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) -1))
(/.f64 (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6) -1) (+.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3) 1))
(pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 1)
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(pow.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 2)
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(pow.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 3)
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(pow.f64 (pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 3) 1/3)
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(sqrt.f64 (pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 2))
(sqrt.f64 (pow.f64 (+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3)) 2))
(log.f64 (exp.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(log.f64 (+.f64 1 (expm1.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)))))
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(cbrt.f64 (pow.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) 3))
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(expm1.f64 (log.f64 (+.f64 0 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(exp.f64 (log.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(exp.f64 (*.f64 (log.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))) 1))
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(log1p.f64 (expm1.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))))
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(fma.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) -1)
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(fma.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) -1)
(fma.f64 1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3) -1)
(fma.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) -1)
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(fma.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2) -1)
(+.f64 -1 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(+.f64 1 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(-.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 0)
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(-.f64 (+.f64 2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))) 1)
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(*.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 1)
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(*.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(*.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2))
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(*.f64 (sqrt.f64 (pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2)) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2)))
(*.f64 (sqrt.f64 (pow.f64 (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) 2) 2)) (sqrt.f64 (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) 2)))
(/.f64 (-.f64 1 (*.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b y-scale)) 2) 1/2)) (-.f64 1 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))
(/.f64 (-.f64 1 (*.f64 1/2 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale b)) 2))) (-.f64 1 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 3)) (+.f64 1 (-.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b y-scale)) 2) 1/2) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2)))) 3)) (+.f64 1 (fma.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale b)) 2) 1/2 (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))))))))
(pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 1)
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) 1/3)
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) 1/2)
(sqrt.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2)
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 3)
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(pow.f64 (E.f64) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))
(pow.f64 (E.f64) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))))))
(pow.f64 (exp.f64 2) (/.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))) 2))
(pow.f64 (exp.f64 2) (/.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))))) 2))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))))))) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2)))))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2)))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2)))))))
(sqrt.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))
(sqrt.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2))
(fabs.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))
(fabs.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1))
(log.f64 (exp.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(log.f64 (+.f64 1 (expm1.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))))
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(cbrt.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3))
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(expm1.f64 (log.f64 (+.f64 2 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(expm1.f64 (log.f64 (+.f64 2 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2)))))))
(log1p.f64 (expm1.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)
(+.f64 1 (expm1.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))))
(+.f64 1 (expm1.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))))))))
(+.f64 (expm1.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) 1)
(+.f64 1 (expm1.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))))))))
(-.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 1)
(+.f64 (pow.f64 (hypot.f64 1 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) 2) -1)
(*.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1))
(pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)
(*.f64 1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))
(pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)
(*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) 1)
(pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)
(*.f64 (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2))
(*.f64 (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3/2))
(*.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3/2) (sqrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(*.f64 (sqrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 3/2))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2))
(pow.f64 (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) 2) 3)
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) (pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 2))
(pow.f64 (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) 2) 3)
(*.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) (*.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)
(*.f64 (*.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2)) (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)))
(pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)
(pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)
(pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)
(pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) 1)
(pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)
(pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 2) 3)
(pow.f64 (pow.f64 (cbrt.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1)) 2) 3)
(pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6) 1/3)
(cbrt.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6))
(pow.f64 (E.f64) (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(pow.f64 (E.f64) (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2)))))))
(pow.f64 (exp.f64 2) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))
(pow.f64 (exp.f64 2) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))))))
(pow.f64 (exp.f64 (cbrt.f64 (*.f64 4 (pow.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))) 2)))) (cbrt.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))))
(pow.f64 (exp.f64 (cbrt.f64 (*.f64 4 (pow.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))))) 2)))) (cbrt.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))))))))
(pow.f64 (exp.f64 (sqrt.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))) (sqrt.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))))
(pow.f64 (exp.f64 (sqrt.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2)))))))) (sqrt.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))))))))
(pow.f64 (pow.f64 (exp.f64 2) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(pow.f64 (pow.f64 (exp.f64 2) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))))))) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2)))))))
(pow.f64 (pow.f64 (exp.f64 2) (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))))
(pow.f64 (pow.f64 (exp.f64 2) (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2)))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2)))))))
(sqrt.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2) 2))
(sqrt.f64 (pow.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2) 2))
(log.f64 (exp.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))
(pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)
(log.f64 (+.f64 1 (expm1.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2))))
(pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)
(cbrt.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 6))
(cbrt.f64 (pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 6))
(expm1.f64 (log1p.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))
(pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)
(log1p.f64 (expm1.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 2)))
(pow.f64 (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 1/2))) 1) 2)

eval3.0s (2.2%)

Compiler

Compiled 123470 to 102378 computations (17.1% saved)

prune965.0ms (0.7%)

Pruning

143 alts after pruning (142 fresh and 1 done)

PrunedKeptTotal
New1217681285
Fresh2674100
Picked101
Done415
Total12481431391
Accurracy
63.3%
Counts
1391 → 143
Alt Table
Click to see full alt table
StatusAccuracyProgram
2.1%
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) 1/2) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (pow.f64 x-scale 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) 2))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))
3.3%
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2)))))))))
9.8%
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3) 1/3)
9.8%
(pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3)
18.0%
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
18.5%
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
18.4%
(pow.f64 (cbrt.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 3)
2.4%
(/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
8.8%
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) 1/3) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
8.8%
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 3) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
8.9%
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
8.7%
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (pow.f64 (pow.f64 (exp.f64 2) (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))))))
12.2%
(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 b y-scale)))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 b y-scale))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b y-scale))))))
2.6%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale))))
2.2%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))
3.4%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (neg.f64 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))))
5.1%
(*.f64 (/.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 y-scale (*.f64 x-scale x-scale))) (pow.f64 (*.f64 x-scale y-scale) 2))
1.3%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (*.f64 1 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
1.2%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) 1) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
1.2%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
4.1%
(*.f64 (*.f64 (*.f64 -1/4 (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
1.3%
(*.f64 (*.f64 (*.f64 -1/4 (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
6.5%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
4.9%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
4.8%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
6.1%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
15.9%
(*.f64 (*.f64 1/4 (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))
6.6%
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
2.4%
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))
6.1%
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
11.8%
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))
11.8%
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
15.9%
(*.f64 (*.f64 1/4 (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))
18.6%
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
11.5%
(*.f64 (*.f64 1/4 y-scale) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1))
5.4%
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3))
18.4%
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3))
18.5%
(*.f64 (*.f64 1/4 y-scale) (/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
5.4%
(*.f64 (*.f64 1/4 y-scale) (-.f64 (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) 1))
7.4%
(*.f64 (*.f64 1/4 y-scale) (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1))
11.7%
(*.f64 (*.f64 1/4 y-scale) (-.f64 (/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) 1))
9.2%
(*.f64 (*.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 b b)))))) 1))
11.1%
(*.f64 (*.f64 1/4 y-scale) (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 8))) (sqrt.f64 2)))
7.1%
(*.f64 (*.f64 1/4 y-scale) (*.f64 (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) b))) (sqrt.f64 2)))
4.1%
(*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
1.2%
(*.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
3.2%
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))
4.2%
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
0.9%
(*.f64 (exp.f64 (log.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (pow.f64 (*.f64 x-scale y-scale) 2))
18.7%
(*.f64 y-scale b)
13.9%
(*.f64 b (neg.f64 y-scale))
8.5%
(*.f64 1/4 (*.f64 (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))) (neg.f64 (sqrt.f64 2))))
12.8%
(*.f64 1/4 (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (neg.f64 (sqrt.f64 2))))
11.8%
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
4.9%
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))
18.5%
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))))
8.7%
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))
6.2%
(*.f64 1/4 (*.f64 y-scale (pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)))
11.1%
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2)))
18.5%
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b 4)) 3)))
7.5%
(*.f64 1/4 (*.f64 y-scale (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)))
7.1%
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3) (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3))))
6.0%
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 b 1/4) (sqrt.f64 (*.f64 (sqrt.f64 b) (*.f64 b 16))))))
8.7%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))
11.6%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (sqrt.f64 2) y-scale))))
11.0%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
8.7%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
3.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
3.4%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))))))))
5.4%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))))))))
3.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (log1p.f64 (expm1.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
3.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (expm1.f64 (log1p.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
2.6%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
5.2%
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b (*.f64 b 16))))) (pow.f64 (*.f64 b 4) 1/6))))
11.2%
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)))
17.3%
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 16 (pow.f64 (cbrt.f64 b) 4))) (cbrt.f64 b))))
8.7%
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
18.4%
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))))
8.7%
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
14.7%
(*.f64 1/4 (*.f64 y-scale (*.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) (cbrt.f64 (*.f64 b 4)))))
18.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 b (pow.f64 (cbrt.f64 4) 3))))
11.0%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 6))))
7.6%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 b (*.f64 b 16))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b (*.f64 b 16))))))))))
9.1%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
10.9%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (expm1.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
4.4%
(*.f64 1/4 (*.f64 y-scale (log.f64 (pow.f64 (exp.f64 b) 4))))
11.8%
(*.f64 1/4 (*.f64 y-scale (expm1.f64 (log1p.f64 (*.f64 b 4)))))
7.2%
(*.f64 1/4 (*.f64 y-scale (exp.f64 (log.f64 (*.f64 b 4)))))
11.1%
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (*.f64 (pow.f64 b 3) 64))))
13.3%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 a a))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
6.4%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (pow.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) 1/2))))
13.8%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))))
13.6%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))))
6.4%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 1 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
6.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (neg.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale)))))
6.3%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (expm1.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))))))
13.0%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 3/2) 1/3))))
17.0%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/4) 2))))
16.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (pow.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) 3))))
14.1%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
9.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) b) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
17.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
22.1%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))))
10.3%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
10.0%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
14.0%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
14.3%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a))))
10.1%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b)))))
13.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
9.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
17.8%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
15.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 4))) (fabs.f64 (cbrt.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))))
9.6%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2))))))
13.5%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
11.6%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (sqrt.f64 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 4)))))))
16.2%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (exp.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))))))
17.8%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
9.7%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
16.2%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (exp.f64 (*.f64 (log.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1/2)))))
13.6%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (cbrt.f64 (pow.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)) 3/2)))))
8.5%
(*.f64 1/4 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
8.5%
(*.f64 1/4 (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
14.4%
(*.f64 1/4 (neg.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
12.8%
(*.f64 1/4 (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))))))
6.1%
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))))))
3.4%
(*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
17.9%
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
17.9%
(sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 8))) 2) 1/8))
11.6%
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
5.6%
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
27.7%
(fabs.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))) 3))
9.0%
(fabs.f64 (*.f64 (sqrt.f64 8) (/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale))))) 3)) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale))))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))))))))))
27.9%
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
27.9%
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))))
11.3%
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (exp.f64 (log.f64 (*.f64 b (sqrt.f64 2)))) (*.f64 1/4 y-scale))))
5.6%
(fabs.f64 (*.f64 (sqrt.f64 8) (log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))))))
18.9%
(fabs.f64 (*.f64 (sqrt.f64 8) (expm1.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))))
27.9%
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))
27.5%
(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
1.1%
(expm1.f64 (log1p.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
17.8%
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
17.1%
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
10.3%
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
Compiler

Compiled 16749 to 11787 computations (29.6% saved)

localize29.0ms (0%)

Local Accuracy

Found 3 expressions with local accuracy:

NewAccuracyProgram
99.7%
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
99.5%
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
99.3%
(*.f64 y-scale (sqrt.f64 8))
Compiler

Compiled 55 to 45 computations (18.2% saved)

series4.0ms (0%)

Counts
3 → 48
Calls

15 calls:

TimeVariablePointExpression
1.0ms
b
@-inf
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
0.0ms
y-scale
@inf
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
0.0ms
b
@inf
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
0.0ms
b
@0
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
0.0ms
y-scale
@0
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))

rewrite100.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1190×sqrt-prod
952×unswap-sqr
870×swap-sqr
460×sqr-pow
428×pow-sqr
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01467
128167
2312767
Stop Event
node limit
Counts
3 → 54
Calls
Call 1
Inputs
(*.f64 y-scale (sqrt.f64 8))
(*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
Outputs
(((+.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (*.f64 y-scale (sqrt.f64 8)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 y-scale (sqrt.f64 8))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 y-scale (sqrt.f64 8))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 8)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((sqrt.f64 (*.f64 8 (*.f64 y-scale y-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((fabs.f64 (*.f64 y-scale (sqrt.f64 8))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) y-scale)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 y-scale (sqrt.f64 8))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 8)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 y-scale 3) (*.f64 8 (sqrt.f64 8)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 y-scale 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((exp.f64 (log.f64 (*.f64 y-scale (sqrt.f64 8)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 y-scale (sqrt.f64 8)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)))
(((+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 y-scale (sqrt.f64 8)))) 1/2) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log.f64 (pow.f64 (exp.f64 (sqrt.f64 2)) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((cbrt.f64 (*.f64 (*.f64 2 (sqrt.f64 2)) (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 3) (*.f64 2 (sqrt.f64 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((exp.f64 (log.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)))
(((+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((sqrt.f64 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((fabs.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 (*.f64 y-scale 1/4)) (sqrt.f64 8)) b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 b 3) (pow.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) 1/4)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) 1/4)) 3) (pow.f64 b 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((exp.f64 (log.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (sqrt.f64 8)) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))) #f)))

simplify95.0ms (0.1%)

Algorithm
egg-herbie
Rules
1240×associate-/r/
1238×associate-/l/
1060×unswap-sqr
982×*-commutative
668×distribute-lft-in
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
01552946
14152870
216252848
368492848
Stop Event
node limit
Counts
102 → 74
Calls
Call 1
Inputs
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 1)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 1))))
(pow.f64 (*.f64 y-scale (sqrt.f64 8)) 1)
(pow.f64 (sqrt.f64 (*.f64 y-scale (sqrt.f64 8))) 2)
(pow.f64 (cbrt.f64 (*.f64 y-scale (sqrt.f64 8))) 3)
(pow.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 8)) 3) 1/3)
(sqrt.f64 (*.f64 8 (*.f64 y-scale y-scale)))
(fabs.f64 (*.f64 y-scale (sqrt.f64 8)))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) y-scale))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 y-scale (sqrt.f64 8)))))
(cbrt.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 8)) 3))
(cbrt.f64 (*.f64 (pow.f64 y-scale 3) (*.f64 8 (sqrt.f64 8))))
(cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 y-scale 3)))
(expm1.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8))))
(exp.f64 (log.f64 (*.f64 y-scale (sqrt.f64 8))))
(log1p.f64 (expm1.f64 (*.f64 y-scale (sqrt.f64 8))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 1)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 1))))
(pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 1)
(pow.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 y-scale (sqrt.f64 8)))) 1/2) 2)
(pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 3)
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 3) 1/3)
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 2)))
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 2)) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))))
(cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 3))
(cbrt.f64 (*.f64 (*.f64 2 (sqrt.f64 2)) (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 3)))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 3) (*.f64 2 (sqrt.f64 2))))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))
(log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 1)
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 1))))
(pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 1)
(pow.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 2)
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 3)
(pow.f64 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 2))
(fabs.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))
(log.f64 (pow.f64 (pow.f64 (exp.f64 (*.f64 y-scale 1/4)) (sqrt.f64 8)) b))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))
(cbrt.f64 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 3))
(cbrt.f64 (*.f64 (pow.f64 b 3) (pow.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) 1/4)) 3)))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) 1/4)) 3) (pow.f64 b 3)))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))
(exp.f64 (log.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))
(log1p.f64 (expm1.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))
Outputs
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) -1)
(*.f64 y-scale (sqrt.f64 8))
(-.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 1)
(*.f64 y-scale (sqrt.f64 8))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 1))
(*.f64 y-scale (sqrt.f64 8))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 3) -1) (fma.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) (+.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 1)))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 y-scale (sqrt.f64 8))))))))
(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 y-scale (sqrt.f64 8))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 y-scale (sqrt.f64 8)))))))
(pow.f64 (*.f64 y-scale (sqrt.f64 8)) 1)
(*.f64 y-scale (sqrt.f64 8))
(pow.f64 (sqrt.f64 (*.f64 y-scale (sqrt.f64 8))) 2)
(*.f64 y-scale (sqrt.f64 8))
(pow.f64 (cbrt.f64 (*.f64 y-scale (sqrt.f64 8))) 3)
(*.f64 y-scale (sqrt.f64 8))
(pow.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 8)) 3) 1/3)
(*.f64 y-scale (sqrt.f64 8))
(sqrt.f64 (*.f64 8 (*.f64 y-scale y-scale)))
(sqrt.f64 (*.f64 y-scale (*.f64 y-scale 8)))
(fabs.f64 (*.f64 y-scale (sqrt.f64 8)))
(*.f64 y-scale (sqrt.f64 8))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) y-scale))
(*.f64 y-scale (sqrt.f64 8))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 y-scale (sqrt.f64 8))
(cbrt.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 8)) 3))
(*.f64 y-scale (sqrt.f64 8))
(cbrt.f64 (*.f64 (pow.f64 y-scale 3) (*.f64 8 (sqrt.f64 8))))
(*.f64 y-scale (sqrt.f64 8))
(cbrt.f64 (*.f64 (*.f64 8 (sqrt.f64 8)) (pow.f64 y-scale 3)))
(*.f64 y-scale (sqrt.f64 8))
(expm1.f64 (log1p.f64 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 y-scale (sqrt.f64 8))
(exp.f64 (log.f64 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 y-scale (sqrt.f64 8))
(log1p.f64 (expm1.f64 (*.f64 y-scale (sqrt.f64 8))))
(*.f64 y-scale (sqrt.f64 8))
(+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) -1)
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 1)
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 1))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 b (*.f64 1/4 y-scale)))))) 3) -1) (+.f64 (exp.f64 (+.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 b (*.f64 1/4 y-scale))))) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 b (*.f64 1/4 y-scale))))))) (+.f64 1 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 b (*.f64 1/4 y-scale)))))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4)))) 3)) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4)))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))))))))
(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b)))))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b)))))))))
(pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 1)
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(pow.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (*.f64 y-scale (sqrt.f64 8)))) 1/2) 2)
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 3)
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 3) 1/3)
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 2)))
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (*.f64 1/4 y-scale))) 2)))
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8)))) 2)))
(sqrt.f64 (*.f64 2 (*.f64 (*.f64 (*.f64 y-scale y-scale) 1/2) (*.f64 b b))))
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 2)) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 3))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(cbrt.f64 (*.f64 (*.f64 2 (sqrt.f64 2)) (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 3)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 3) (*.f64 2 (sqrt.f64 2))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)) 1/4))
(*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) -1)
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 1)
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 1))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (*.f64 1/4 y-scale))))) 3) -1) (+.f64 (exp.f64 (+.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (*.f64 1/4 y-scale)))) (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (*.f64 1/4 y-scale)))))) (+.f64 1 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (*.f64 1/4 y-scale))))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8)))))) 3)) (+.f64 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))))) (+.f64 1 (exp.f64 (log1p.f64 (*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8)))))))))
(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))))))
(pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 1)
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(pow.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 2)
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 3)
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(pow.f64 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 3) 1/3)
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 2))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(fabs.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(log.f64 (pow.f64 (pow.f64 (exp.f64 (*.f64 y-scale 1/4)) (sqrt.f64 8)) b))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(cbrt.f64 (pow.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8)) 3))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(cbrt.f64 (*.f64 (pow.f64 b 3) (pow.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) 1/4)) 3)))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) 1/4)) 3) (pow.f64 b 3)))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(exp.f64 (log.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))
(log1p.f64 (expm1.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 1/4 (*.f64 b (sqrt.f64 8))))
(*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))

localize6.0ms (0%)

Compiler

Compiled 10 to 6 computations (40% saved)

localize62.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
97.6%
(exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))
97.0%
(-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)
87.6%
(sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))
87.1%
(log1p.f64 (*.f64 b (*.f64 b 16)))
Compiler

Compiled 76 to 57 computations (25% saved)

series53.0ms (0%)

Counts
4 → 48
Calls

12 calls:

TimeVariablePointExpression
42.0ms
b
@0
(sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))
5.0ms
b
@inf
(-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)
1.0ms
b
@-inf
(sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))
1.0ms
b
@inf
(sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))
1.0ms
b
@-inf
(log1p.f64 (*.f64 b (*.f64 b 16)))

rewrite226.0ms (0.2%)

Algorithm
batch-egg-rewrite
Rules
876×*-commutative
662×unswap-sqr
542×swap-sqr
476×associate-*r/
422×associate-*l/
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
01268
124356
2260256
Stop Event
node limit
Counts
4 → 284
Calls
Call 1
Inputs
(log1p.f64 (*.f64 b (*.f64 b 16)))
(sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))
(-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)
(exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))
Outputs
(((+.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 0 (log1p.f64 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (+.f64 0 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (+.f64 0 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (*.f64 1 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 1 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (*.f64 1 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (*.f64 1 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 1) (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (*.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) 1) (*.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((-.f64 (+.f64 0 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 1 (log1p.f64 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 2 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (*.f64 (sqrt.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2))) (*.f64 (cbrt.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) (*.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3/2) (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/6) (pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/6)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (-.f64 0 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2)) (-.f64 0 (log1p.f64 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))) (-.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (-.f64 (*.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (*.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))) (-.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) 1) (+.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 0 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3)) (+.f64 0 (-.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2) (*.f64 0 (log1p.f64 (*.f64 b (*.f64 b 16))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 3) (pow.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 3)) (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 (pow.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) 3) (pow.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 3)) (+.f64 (*.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (-.f64 (*.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((sqrt.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((log.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((cbrt.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((expm1.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((exp.f64 (log.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)))
(((+.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 b 4) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 1 (*.f64 b 4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 b 4) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 b 4) (pow.f64 1 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 4 b) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (sqrt.f64 (*.f64 b 4)) (sqrt.f64 (*.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 4 (sqrt.f64 b)) (sqrt.f64 b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (sqrt.f64 b) (*.f64 4 (sqrt.f64 b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (cbrt.f64 (*.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (cbrt.f64 (*.f64 b 4)) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (/.f64 1 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (/.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 1 1/2) (*.f64 b 4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) 1/2) (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 1/2) (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (*.f64 b b) 1/2) (pow.f64 16 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 16 1/2) (pow.f64 (*.f64 b b) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (sqrt.f64 (*.f64 4 (sqrt.f64 b))) (sqrt.f64 (sqrt.f64 b))) (*.f64 (sqrt.f64 (*.f64 4 (sqrt.f64 b))) (sqrt.f64 (sqrt.f64 b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (sqrt.f64 (sqrt.f64 b)) (sqrt.f64 (*.f64 4 (sqrt.f64 b)))) (*.f64 (sqrt.f64 (sqrt.f64 b)) (sqrt.f64 (*.f64 4 (sqrt.f64 b))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (cbrt.f64 (*.f64 b 4)))) (*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (cbrt.f64 (*.f64 b 4))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (cbrt.f64 (sqrt.f64 (*.f64 b 4)))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (cbrt.f64 (sqrt.f64 (*.f64 b 4))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (*.f64 b 4))) (*.f64 (sqrt.f64 (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (*.f64 b 4)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))) (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 3/2) (pow.f64 (cbrt.f64 (*.f64 b 4)) 3/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/6) (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/6)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 1 (/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 1 (/.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 1 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 1 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (*.f64 b 4)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (*.f64 b 4)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (pow.f64 1 1/2) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (pow.f64 1 1/2) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) 1) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) 1) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) (exp.f64 (log1p.f64 (*.f64 b 4)))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (*.f64 b (*.f64 b 16)) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (*.f64 b 4) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 b 4)) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 b 4)) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((fabs.f64 (*.f64 b 4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((log.f64 (exp.f64 (*.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 b 4)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 b 4) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((exp.f64 (log.f64 (*.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)))
(((+.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 1 (-.f64 (*.f64 b (*.f64 b 16)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (*.f64 b (*.f64 b 16)) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 0 (*.f64 b (*.f64 b 16))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) -2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 -1 (+.f64 1 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (neg.f64 (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (neg.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (+.f64 -1 (*.f64 b (*.f64 b 16))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 b (*.f64 b 16)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 16 (*.f64 b b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 b 16) b) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 1 (*.f64 b (*.f64 b 16))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 b (*.f64 b 16)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 b 4) (*.f64 b 4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (sqrt.f64 (*.f64 b 4)) (*.f64 (*.f64 b 4) (sqrt.f64 (*.f64 b 4)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 4 (sqrt.f64 b)) (*.f64 b (*.f64 4 (sqrt.f64 b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (sqrt.f64 b) (*.f64 (*.f64 b 16) (sqrt.f64 b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (cbrt.f64 (*.f64 b 4)) (*.f64 (*.f64 b 4) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (cbrt.f64 (*.f64 b 16)) (*.f64 b (cbrt.f64 (pow.f64 (*.f64 b 16) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (cbrt.f64 (pow.f64 (*.f64 b 16) 2)) (*.f64 b (cbrt.f64 (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (cbrt.f64 b) (*.f64 (*.f64 b 16) (pow.f64 (cbrt.f64 b) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 b) 2) (*.f64 (*.f64 b 16) (cbrt.f64 b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 b b) 16) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 b b) (*.f64 (pow.f64 16 1/2) (pow.f64 16 1/2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (/.f64 1 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (*.f64 b 4) (sqrt.f64 (*.f64 b 4))) (sqrt.f64 (*.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 b (*.f64 4 (sqrt.f64 b))) (*.f64 4 (sqrt.f64 b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 b (cbrt.f64 (pow.f64 (*.f64 b 16) 2))) (cbrt.f64 (*.f64 b 16))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (*.f64 b 16) (sqrt.f64 b)) (sqrt.f64 b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (*.f64 b 16) (pow.f64 (cbrt.f64 b) 2)) (cbrt.f64 b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (*.f64 b 4) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (cbrt.f64 (*.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (*.f64 b 16) (cbrt.f64 b)) (pow.f64 (cbrt.f64 b) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 b (cbrt.f64 (*.f64 b 16))) (cbrt.f64 (pow.f64 (*.f64 b 16) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4))) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (+.f64 1 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (+.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (+.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) -1) (+.f64 1 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) 1) (/.f64 1 (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (/.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (*.f64 b (*.f64 b 16))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (-.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2))) (neg.f64 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (+.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) (*.f64 256 (pow.f64 b 4))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (-.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 2))) (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) (*.f64 256 (pow.f64 b 4))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) 3) (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 3))) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) (*.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (pow.f64 1 1/2) (pow.f64 1 1/2)) (*.f64 b (*.f64 b 16))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4))) (*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (cbrt.f64 (*.f64 b 4))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (cbrt.f64 (*.f64 b 4)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))) (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 3/2) (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 3/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (*.f64 256 (pow.f64 b 4)) 1/4) (pow.f64 (*.f64 256 (pow.f64 b 4)) 1/4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 6) 1/6) (pow.f64 (pow.f64 (*.f64 b 4) 6) 1/6)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 1 (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 1 (/.f64 (/.f64 1 (*.f64 b (*.f64 b 16))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 1 (/.f64 (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (+.f64 (neg.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 1 (/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (neg.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 b (*.f64 b 16)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (+.f64 (*.f64 b (*.f64 b 16)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (/.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (+.f64 1 (-.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (/.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (/.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (-.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (-.f64 -1 (+.f64 1 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) -1) (*.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) -1) (*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) -1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) 3) -1) (*.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 3) -1) (*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 3) -1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) 1) (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (*.f64 b 4) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (*.f64 b 4) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) 1) 1) (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (*.f64 b 4)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (*.f64 b 4)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4)))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) -1) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2))) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) 3) -1) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2))) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) -1) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 3) -1) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) 1) (+.f64 (*.f64 b (*.f64 b 16)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (*.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) 1) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (*.f64 (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (+.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))) (+.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (*.f64 b (*.f64 b 16)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (*.f64 b 4) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 b 4)) 4) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 b 4)) 6) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (*.f64 256 (pow.f64 b 4)) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (pow.f64 (*.f64 b 4) 6) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 2/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((neg.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((neg.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((sqrt.f64 (*.f64 256 (pow.f64 b 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 16) b) b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 b 4) 6)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 b 16) 3) (pow.f64 b 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 b 4)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((fma.f64 1 (+.f64 1 (*.f64 b (*.f64 b 16))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((fma.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((fma.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2) (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)))
(((+.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 1 (*.f64 b (*.f64 b 16))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (*.f64 b (*.f64 b 16)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 0 (+.f64 1 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((+.f64 -1 (+.f64 (*.f64 b (*.f64 b 16)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((-.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((-.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (-.f64 (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((-.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (-.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 1 (+.f64 1 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2) (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (-.f64 1 (*.f64 256 (pow.f64 b 4))) (/.f64 1 (+.f64 1 (*.f64 -16 (*.f64 b b))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (+.f64 1 (pow.f64 (*.f64 b 4) 6)) (/.f64 1 (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (*.f64 (cbrt.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1) (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3/2) (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (E.f64) (/.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2)) (pow.f64 (E.f64) (/.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 1/6) (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 1/6)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (/.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (/.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((*.f64 (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (/.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (/.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 1 (/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 256 (pow.f64 b 4))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 1 (/.f64 (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16))) (+.f64 1 (pow.f64 (*.f64 b 4) 6)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (-.f64 1 (*.f64 256 (pow.f64 b 4))) (+.f64 1 (*.f64 -16 (*.f64 b b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 1 (pow.f64 (*.f64 b 4) 6)) (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 1 (pow.f64 (*.f64 b 4) 6)) (+.f64 (*.f64 256 (pow.f64 b 4)) (+.f64 1 (*.f64 -16 (*.f64 b b))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 1 (-.f64 1 (*.f64 256 (pow.f64 b 4)))) (+.f64 1 (*.f64 -16 (*.f64 b b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 1 (+.f64 1 (pow.f64 (*.f64 b 4) 6))) (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (-.f64 1 (*.f64 256 (pow.f64 b 4))) 1) (+.f64 1 (*.f64 -16 (*.f64 b b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (*.f64 (+.f64 1 (pow.f64 (*.f64 b 4) 6)) 1) (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (-.f64 (*.f64 256 (pow.f64 b 4)) 1) (-.f64 (*.f64 b (*.f64 b 16)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 2) 1) (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) -1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 2) 1) (+.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 3) -1) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 2) (-.f64 1 (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 b 16)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((sqrt.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((log.f64 (exp.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((cbrt.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((expm1.f64 (log.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)) ((log1p.f64 (expm1.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((log1p.f64 (*.f64 b (*.f64 b 16))) (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1)) (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1) (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) #f)))

simplify119.0ms (0.1%)

Algorithm
egg-herbie
Rules
1126×associate-*r*
834×associate-*l*
766×fma-def
646×*-commutative
498×distribute-lft-in
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07325932
118955932
Stop Event
node limit
Counts
332 → 322
Calls
Call 1
Inputs
(*.f64 16 (pow.f64 b 2))
(+.f64 (*.f64 -128 (pow.f64 b 4)) (*.f64 16 (pow.f64 b 2)))
(+.f64 (*.f64 -128 (pow.f64 b 4)) (+.f64 (*.f64 16 (pow.f64 b 2)) (*.f64 4096/3 (pow.f64 b 6))))
(+.f64 (*.f64 -128 (pow.f64 b 4)) (+.f64 (*.f64 16 (pow.f64 b 2)) (+.f64 (*.f64 -16384 (pow.f64 b 8)) (*.f64 4096/3 (pow.f64 b 6)))))
(+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))
(+.f64 (log.f64 16) (+.f64 (*.f64 -2 (log.f64 (/.f64 1 b))) (*.f64 1/16 (/.f64 1 (pow.f64 b 2)))))
(-.f64 (+.f64 (log.f64 16) (+.f64 (*.f64 -2 (log.f64 (/.f64 1 b))) (*.f64 1/16 (/.f64 1 (pow.f64 b 2))))) (*.f64 1/512 (/.f64 1 (pow.f64 b 4))))
(-.f64 (+.f64 (*.f64 1/12288 (/.f64 1 (pow.f64 b 6))) (+.f64 (log.f64 16) (+.f64 (*.f64 -2 (log.f64 (/.f64 1 b))) (*.f64 1/16 (/.f64 1 (pow.f64 b 2)))))) (*.f64 1/512 (/.f64 1 (pow.f64 b 4))))
(+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))
(+.f64 (log.f64 16) (+.f64 (*.f64 1/16 (/.f64 1 (pow.f64 b 2))) (*.f64 -2 (log.f64 (/.f64 -1 b)))))
(-.f64 (+.f64 (log.f64 16) (+.f64 (*.f64 1/16 (/.f64 1 (pow.f64 b 2))) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (*.f64 1/512 (/.f64 1 (pow.f64 b 4))))
(-.f64 (+.f64 (*.f64 1/12288 (/.f64 1 (pow.f64 b 6))) (+.f64 (log.f64 16) (+.f64 (*.f64 1/16 (/.f64 1 (pow.f64 b 2))) (*.f64 -2 (log.f64 (/.f64 -1 b)))))) (*.f64 1/512 (/.f64 1 (pow.f64 b 4))))
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(*.f64 4 b)
(sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1))
(+.f64 (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1)) (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2)))))
(+.f64 (*.f64 -1/2048 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1) 3))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 2) (pow.f64 b 4)))) (+.f64 (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1)) (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))))))
(+.f64 (*.f64 -1/2048 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1) 3))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 2) (pow.f64 b 4)))) (+.f64 (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1)) (+.f64 (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2)))) (*.f64 1/65536 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1) 5))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 3) (pow.f64 b 6)))))))
(sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))
(+.f64 (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2)))) (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1)))
(+.f64 (*.f64 -1/2048 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1) 3))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 2) (pow.f64 b 4)))) (+.f64 (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2)))) (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))))
(+.f64 (*.f64 -1/2048 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1) 3))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 2) (pow.f64 b 4)))) (+.f64 (*.f64 1/65536 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1) 5))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 3) (pow.f64 b 6)))) (+.f64 (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2)))) (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1)))))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (pow.f64 b 2))
(-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1)
(-.f64 (+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b)))))) 1)
(-.f64 (+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b)))))) 1)
(-.f64 (+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b)))))) 1)
(-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1)
(-.f64 (+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b)))))) 1)
(-.f64 (+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b)))))) 1)
(-.f64 (+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b)))))) 1)
1
(+.f64 (*.f64 16 (pow.f64 b 2)) 1)
(+.f64 (*.f64 16 (pow.f64 b 2)) 1)
(+.f64 (*.f64 16 (pow.f64 b 2)) 1)
(exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b)))))
(+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))))
(+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))))
(+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))))
(exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b)))))
(+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))))
(+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))))
(+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))))
(+.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 0)
(+.f64 0 (log1p.f64 (*.f64 b (*.f64 b 16))))
(+.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(+.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(+.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)))
(+.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) -1)
(+.f64 (+.f64 0 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(+.f64 (+.f64 0 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(+.f64 (*.f64 1 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 1 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))
(+.f64 (*.f64 1 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (*.f64 1 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 1) (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 1))
(+.f64 (*.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) 1) (*.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 1))
(-.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) 1)
(-.f64 (+.f64 0 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) 1)
(*.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 1)
(*.f64 1 (log1p.f64 (*.f64 b (*.f64 b 16))))
(*.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(*.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2))
(*.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(*.f64 2 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (*.f64 (sqrt.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2))) (*.f64 (cbrt.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2))))
(*.f64 (*.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) (*.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
(*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
(*.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3/2) (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3/2))
(*.f64 (pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/6) (pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/6))
(/.f64 (-.f64 0 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2)) (-.f64 0 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(/.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))) (-.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))
(/.f64 (-.f64 (*.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (*.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))) (-.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) 1) (+.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) 1))
(/.f64 (+.f64 0 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3)) (+.f64 0 (-.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2) (*.f64 0 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
(/.f64 (+.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 3) (pow.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 3)) (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))))
(/.f64 (+.f64 (pow.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) 3) (pow.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 3)) (+.f64 (*.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (-.f64 (*.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))))
(pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 1)
(pow.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)
(pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3)
(pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/3)
(sqrt.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2))
(log.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))
(cbrt.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3))
(expm1.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(exp.f64 (log.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)
(*.f64 b 4)
(*.f64 1 (*.f64 b 4))
(*.f64 (*.f64 b 4) 1)
(*.f64 (*.f64 b 4) (pow.f64 1 1/2))
(*.f64 4 b)
(*.f64 (sqrt.f64 (*.f64 b 4)) (sqrt.f64 (*.f64 b 4)))
(*.f64 (*.f64 4 (sqrt.f64 b)) (sqrt.f64 b))
(*.f64 (sqrt.f64 b) (*.f64 4 (sqrt.f64 b)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (cbrt.f64 (*.f64 b 4)))
(*.f64 (cbrt.f64 (*.f64 b 4)) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))
(*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (/.f64 1 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))))
(*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)))
(*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (/.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 (pow.f64 1 1/2) (*.f64 b 4))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) 1/2) (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 1/2))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 1/2) (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) 1/2))
(*.f64 (pow.f64 (*.f64 b b) 1/2) (pow.f64 16 1/2))
(*.f64 (pow.f64 16 1/2) (pow.f64 (*.f64 b b) 1/2))
(*.f64 (*.f64 (sqrt.f64 (*.f64 4 (sqrt.f64 b))) (sqrt.f64 (sqrt.f64 b))) (*.f64 (sqrt.f64 (*.f64 4 (sqrt.f64 b))) (sqrt.f64 (sqrt.f64 b))))
(*.f64 (*.f64 (sqrt.f64 (sqrt.f64 b)) (sqrt.f64 (*.f64 4 (sqrt.f64 b)))) (*.f64 (sqrt.f64 (sqrt.f64 b)) (sqrt.f64 (*.f64 4 (sqrt.f64 b)))))
(*.f64 (*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (cbrt.f64 (*.f64 b 4)))) (*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (cbrt.f64 (*.f64 b 4)))))
(*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (cbrt.f64 (sqrt.f64 (*.f64 b 4)))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (cbrt.f64 (sqrt.f64 (*.f64 b 4)))))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (*.f64 b 4))) (*.f64 (sqrt.f64 (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (*.f64 b 4))))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))) (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 3/2) (pow.f64 (cbrt.f64 (*.f64 b 4)) 3/2))
(*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/6) (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/6))
(/.f64 1 (/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(/.f64 1 (/.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (*.f64 1 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (*.f64 1 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (*.f64 (cbrt.f64 (*.f64 b 4)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (*.f64 (cbrt.f64 (*.f64 b 4)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (*.f64 (pow.f64 1 1/2) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (*.f64 (pow.f64 1 1/2) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) 1) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) 1) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) (exp.f64 (log1p.f64 (*.f64 b 4)))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1))
(pow.f64 (*.f64 b (*.f64 b 16)) 1/2)
(pow.f64 (*.f64 b 4) 1)
(pow.f64 (sqrt.f64 (*.f64 b 4)) 2)
(pow.f64 (cbrt.f64 (*.f64 b 4)) 3)
(pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3)
(fabs.f64 (*.f64 b 4))
(log.f64 (exp.f64 (*.f64 b 4)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b 4))))
(cbrt.f64 (pow.f64 (*.f64 b 4) 3))
(expm1.f64 (log1p.f64 (*.f64 b 4)))
(exp.f64 (log.f64 (*.f64 b 4)))
(log1p.f64 (expm1.f64 (*.f64 b 4)))
(+.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)
(+.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) -1))
(+.f64 1 (-.f64 (*.f64 b (*.f64 b 16)) 1))
(+.f64 (*.f64 b (*.f64 b 16)) 0)
(+.f64 0 (*.f64 b (*.f64 b 16)))
(+.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) -2)
(+.f64 -1 (+.f64 1 (*.f64 b (*.f64 b 16))))
(+.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (neg.f64 (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(+.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (neg.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))))
(+.f64 (+.f64 -1 (*.f64 b (*.f64 b 16))) 1)
(*.f64 b (*.f64 b 16))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 b 16) b)
(*.f64 1 (*.f64 b (*.f64 b 16)))
(*.f64 (*.f64 b (*.f64 b 16)) 1)
(*.f64 (*.f64 b 4) (*.f64 b 4))
(*.f64 (sqrt.f64 (*.f64 b 4)) (*.f64 (*.f64 b 4) (sqrt.f64 (*.f64 b 4))))
(*.f64 (*.f64 4 (sqrt.f64 b)) (*.f64 b (*.f64 4 (sqrt.f64 b))))
(*.f64 (sqrt.f64 b) (*.f64 (*.f64 b 16) (sqrt.f64 b)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (pow.f64 (cbrt.f64 (*.f64 b 4)) 4))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4))))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))
(*.f64 (cbrt.f64 (*.f64 b 4)) (*.f64 (*.f64 b 4) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)))
(*.f64 (cbrt.f64 (*.f64 b 16)) (*.f64 b (cbrt.f64 (pow.f64 (*.f64 b 16) 2))))
(*.f64 (cbrt.f64 (pow.f64 (*.f64 b 16) 2)) (*.f64 b (cbrt.f64 (*.f64 b 16))))
(*.f64 (cbrt.f64 b) (*.f64 (*.f64 b 16) (pow.f64 (cbrt.f64 b) 2)))
(*.f64 (pow.f64 (cbrt.f64 b) 2) (*.f64 (*.f64 b 16) (cbrt.f64 b)))
(*.f64 (*.f64 b b) 16)
(*.f64 (*.f64 b b) (*.f64 (pow.f64 16 1/2) (pow.f64 16 1/2)))
(*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (/.f64 1 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1))))
(*.f64 (*.f64 (*.f64 b 4) (sqrt.f64 (*.f64 b 4))) (sqrt.f64 (*.f64 b 4)))
(*.f64 (*.f64 b (*.f64 4 (sqrt.f64 b))) (*.f64 4 (sqrt.f64 b)))
(*.f64 (*.f64 b (cbrt.f64 (pow.f64 (*.f64 b 16) 2))) (cbrt.f64 (*.f64 b 16)))
(*.f64 (*.f64 (*.f64 b 16) (sqrt.f64 b)) (sqrt.f64 b))
(*.f64 (*.f64 (*.f64 b 16) (pow.f64 (cbrt.f64 b) 2)) (cbrt.f64 b))
(*.f64 (*.f64 (*.f64 b 4) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (cbrt.f64 (*.f64 b 4)))
(*.f64 (*.f64 (*.f64 b 16) (cbrt.f64 b)) (pow.f64 (cbrt.f64 b) 2))
(*.f64 (*.f64 b (cbrt.f64 (*.f64 b 16))) (cbrt.f64 (pow.f64 (*.f64 b 16) 2)))
(*.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4))) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))
(*.f64 (+.f64 1 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (+.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) -1))
(*.f64 (+.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) -1) (+.f64 1 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(*.f64 (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))
(*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))
(*.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) 1) (/.f64 1 (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (/.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))))
(*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (*.f64 b (*.f64 b 16)))
(*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (-.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2))) (neg.f64 (*.f64 b (*.f64 b 16))))
(*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (+.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) (*.f64 256 (pow.f64 b 4)))))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (-.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 2))) (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) (*.f64 256 (pow.f64 b 4))) 1))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) 3) (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 3))) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) (*.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)))))
(*.f64 (*.f64 (pow.f64 1 1/2) (pow.f64 1 1/2)) (*.f64 b (*.f64 b 16)))
(*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)))
(*.f64 (*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4))) (*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4))))
(*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (cbrt.f64 (*.f64 b 4))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (cbrt.f64 (*.f64 b 4))))
(*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))) (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 3/2) (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 3/2))
(*.f64 (pow.f64 (*.f64 256 (pow.f64 b 4)) 1/4) (pow.f64 (*.f64 256 (pow.f64 b 4)) 1/4))
(*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 6) 1/6) (pow.f64 (pow.f64 (*.f64 b 4) 6) 1/6))
(/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16))))
(/.f64 1 (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))
(/.f64 1 (/.f64 (/.f64 1 (*.f64 b (*.f64 b 16))) 1))
(/.f64 1 (/.f64 (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (+.f64 (neg.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) 1)))
(/.f64 1 (/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (neg.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(/.f64 (*.f64 b (*.f64 b 16)) 1)
(/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (+.f64 (*.f64 b (*.f64 b 16)) 2))
(/.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (/.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (*.f64 b (*.f64 b 16))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (+.f64 1 (-.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (/.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (/.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))))
(/.f64 (-.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (-.f64 -1 (+.f64 1 (*.f64 b (*.f64 b 16)))))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) -1) (*.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2))))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) -1) (*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) -1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) 3) -1) (*.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 3) -1) (*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 3) -1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) 1) (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (*.f64 (*.f64 b 4) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (*.f64 (*.f64 b 4) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (*.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) 1) 1) (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (*.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (*.f64 b 4)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (*.f64 b 4)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4)))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) -1) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2))) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) 3) -1) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2))) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) -1) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))
(/.f64 (*.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 3) -1) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) 1) (+.f64 (*.f64 b (*.f64 b 16)) 2))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (*.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) 1) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (*.f64 (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (+.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))) (+.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))))
(pow.f64 (*.f64 b (*.f64 b 16)) 1)
(pow.f64 (*.f64 b 4) 2)
(pow.f64 (sqrt.f64 (*.f64 b 4)) 4)
(pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 3)
(pow.f64 (cbrt.f64 (*.f64 b 4)) 6)
(pow.f64 (*.f64 256 (pow.f64 b 4)) 1/2)
(pow.f64 (pow.f64 (*.f64 b 4) 6) 1/3)
(pow.f64 (pow.f64 (*.f64 b 4) 3) 2/3)
(neg.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(neg.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))))
(sqrt.f64 (*.f64 256 (pow.f64 b 4)))
(log.f64 (pow.f64 (pow.f64 (exp.f64 16) b) b))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 b 16)))))
(cbrt.f64 (pow.f64 (*.f64 b 4) 6))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b 16) 3) (pow.f64 b 3)))
(expm1.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))
(exp.f64 (*.f64 (log.f64 (*.f64 b 4)) 2))
(log1p.f64 (expm1.f64 (*.f64 b (*.f64 b 16))))
(fma.f64 1 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)
(fma.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) -1)
(fma.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2) (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) -1)
(+.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 0)
(+.f64 1 (*.f64 b (*.f64 b 16)))
(+.f64 (*.f64 b (*.f64 b 16)) 1)
(+.f64 0 (+.f64 1 (*.f64 b (*.f64 b 16))))
(+.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) -1)
(+.f64 -1 (+.f64 (*.f64 b (*.f64 b 16)) 2))
(-.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 0)
(-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 1)
(-.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (-.f64 (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1))
(-.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (-.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) 1))
(-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 1)
(*.f64 1 (+.f64 1 (*.f64 b (*.f64 b 16))))
(*.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))
(*.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2) (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))
(*.f64 (-.f64 1 (*.f64 256 (pow.f64 b 4))) (/.f64 1 (+.f64 1 (*.f64 -16 (*.f64 b b)))))
(*.f64 (+.f64 1 (pow.f64 (*.f64 b 4) 6)) (/.f64 1 (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16)))))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (*.f64 (cbrt.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))))
(*.f64 (*.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))
(*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))
(*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1) (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3/2) (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3/2))
(*.f64 (pow.f64 (E.f64) (/.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2)) (pow.f64 (E.f64) (/.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2)))
(*.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 1/6) (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 1/6))
(*.f64 (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (/.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (/.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)))
(*.f64 (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (/.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (/.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)))
(/.f64 1 (/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 256 (pow.f64 b 4)))))
(/.f64 1 (/.f64 (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16))) (+.f64 1 (pow.f64 (*.f64 b 4) 6))))
(/.f64 (-.f64 1 (*.f64 256 (pow.f64 b 4))) (+.f64 1 (*.f64 -16 (*.f64 b b))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 b 4) 6)) (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16))))
(/.f64 (+.f64 1 (pow.f64 (*.f64 b 4) 6)) (+.f64 (*.f64 256 (pow.f64 b 4)) (+.f64 1 (*.f64 -16 (*.f64 b b)))))
(/.f64 (*.f64 1 (-.f64 1 (*.f64 256 (pow.f64 b 4)))) (+.f64 1 (*.f64 -16 (*.f64 b b))))
(/.f64 (*.f64 1 (+.f64 1 (pow.f64 (*.f64 b 4) 6))) (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16))))
(/.f64 (*.f64 (-.f64 1 (*.f64 256 (pow.f64 b 4))) 1) (+.f64 1 (*.f64 -16 (*.f64 b b))))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (*.f64 b 4) 6)) 1) (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16))))
(/.f64 (-.f64 (*.f64 256 (pow.f64 b 4)) 1) (-.f64 (*.f64 b (*.f64 b 16)) 1))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 2) 1) (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) -1))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 2) 1) (+.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 1))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 3) -1) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 2) (-.f64 1 (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))))
(pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 1)
(pow.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)
(pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3)
(pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 b 16))))
(pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 1/3)
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(sqrt.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2))
(log.f64 (exp.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))
(log.f64 (+.f64 1 (expm1.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(cbrt.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))
(expm1.f64 (log.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(log1p.f64 (expm1.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))
Outputs
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 -128 (pow.f64 b 4)) (*.f64 16 (pow.f64 b 2)))
(fma.f64 -128 (pow.f64 b 4) (*.f64 16 (*.f64 b b)))
(+.f64 (*.f64 -128 (pow.f64 b 4)) (+.f64 (*.f64 16 (pow.f64 b 2)) (*.f64 4096/3 (pow.f64 b 6))))
(fma.f64 -128 (pow.f64 b 4) (fma.f64 16 (*.f64 b b) (*.f64 4096/3 (pow.f64 b 6))))
(+.f64 (*.f64 -128 (pow.f64 b 4)) (+.f64 (*.f64 16 (pow.f64 b 2)) (+.f64 (*.f64 -16384 (pow.f64 b 8)) (*.f64 4096/3 (pow.f64 b 6)))))
(fma.f64 -128 (pow.f64 b 4) (fma.f64 16 (*.f64 b b) (fma.f64 -16384 (pow.f64 b 8) (*.f64 4096/3 (pow.f64 b 6)))))
(+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))
(*.f64 16 (*.f64 b b))
(+.f64 (log.f64 16) (+.f64 (*.f64 -2 (log.f64 (/.f64 1 b))) (*.f64 1/16 (/.f64 1 (pow.f64 b 2)))))
(*.f64 16 (*.f64 b b))
(-.f64 (+.f64 (log.f64 16) (+.f64 (*.f64 -2 (log.f64 (/.f64 1 b))) (*.f64 1/16 (/.f64 1 (pow.f64 b 2))))) (*.f64 1/512 (/.f64 1 (pow.f64 b 4))))
(+.f64 (log.f64 16) (-.f64 (fma.f64 -2 (neg.f64 (log.f64 b)) (/.f64 1/16 (*.f64 b b))) (/.f64 1/512 (pow.f64 b 4))))
(-.f64 (+.f64 (*.f64 1/12288 (/.f64 1 (pow.f64 b 6))) (+.f64 (log.f64 16) (+.f64 (*.f64 -2 (log.f64 (/.f64 1 b))) (*.f64 1/16 (/.f64 1 (pow.f64 b 2)))))) (*.f64 1/512 (/.f64 1 (pow.f64 b 4))))
(+.f64 (/.f64 1/12288 (pow.f64 b 6)) (+.f64 (log.f64 16) (-.f64 (fma.f64 -2 (neg.f64 (log.f64 b)) (/.f64 1/16 (*.f64 b b))) (/.f64 1/512 (pow.f64 b 4)))))
(+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))
(*.f64 16 (*.f64 b b))
(+.f64 (log.f64 16) (+.f64 (*.f64 1/16 (/.f64 1 (pow.f64 b 2))) (*.f64 -2 (log.f64 (/.f64 -1 b)))))
(*.f64 16 (*.f64 b b))
(-.f64 (+.f64 (log.f64 16) (+.f64 (*.f64 1/16 (/.f64 1 (pow.f64 b 2))) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (*.f64 1/512 (/.f64 1 (pow.f64 b 4))))
(+.f64 (log.f64 16) (-.f64 (fma.f64 -2 (neg.f64 (log.f64 b)) (/.f64 1/16 (*.f64 b b))) (/.f64 1/512 (pow.f64 b 4))))
(-.f64 (+.f64 (*.f64 1/12288 (/.f64 1 (pow.f64 b 6))) (+.f64 (log.f64 16) (+.f64 (*.f64 1/16 (/.f64 1 (pow.f64 b 2))) (*.f64 -2 (log.f64 (/.f64 -1 b)))))) (*.f64 1/512 (/.f64 1 (pow.f64 b 4))))
(+.f64 (/.f64 1/12288 (pow.f64 b 6)) (+.f64 (log.f64 16) (-.f64 (fma.f64 -2 (neg.f64 (log.f64 b)) (/.f64 1/16 (*.f64 b b))) (/.f64 1/512 (pow.f64 b 4)))))
(*.f64 4 b)
(*.f64 16 (*.f64 b b))
(*.f64 4 b)
(*.f64 16 (*.f64 b b))
(*.f64 4 b)
(*.f64 16 (*.f64 b b))
(*.f64 4 b)
(*.f64 16 (*.f64 b b))
(sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1))
(*.f64 16 (*.f64 b b))
(+.f64 (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1)) (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2)))))
(+.f64 (sqrt.f64 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b)))))) (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) (*.f64 b b)))))
(+.f64 (*.f64 -1/2048 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1) 3))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 2) (pow.f64 b 4)))) (+.f64 (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1)) (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))))))
(fma.f64 -1/2048 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) 3))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) 2) (pow.f64 b 4))) (+.f64 (sqrt.f64 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b)))))) (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) (*.f64 b b))))))
(+.f64 (*.f64 -1/2048 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1) 3))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 2) (pow.f64 b 4)))) (+.f64 (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1)) (+.f64 (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2)))) (*.f64 1/65536 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1) 5))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 3) (pow.f64 b 6)))))))
(fma.f64 -1/2048 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) 3))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) 2) (pow.f64 b 4))) (+.f64 (sqrt.f64 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b)))))) (fma.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) (*.f64 b b))) (*.f64 1/65536 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) 5))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) 3) (pow.f64 b 6)))))))
(sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2)))) (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1)))
(+.f64 (sqrt.f64 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b)))))) (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) (*.f64 b b)))))
(+.f64 (*.f64 -1/2048 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1) 3))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 2) (pow.f64 b 4)))) (+.f64 (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2)))) (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))))
(fma.f64 -1/2048 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) 3))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) 2) (pow.f64 b 4))) (+.f64 (sqrt.f64 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b)))))) (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) (*.f64 b b))))))
(+.f64 (*.f64 -1/2048 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1) 3))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 2) (pow.f64 b 4)))) (+.f64 (*.f64 1/65536 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1) 5))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 3) (pow.f64 b 6)))) (+.f64 (*.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2)))) (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1)))))
(fma.f64 -1/2048 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) 3))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) 2) (pow.f64 b 4))) (+.f64 (sqrt.f64 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b)))))) (fma.f64 1/32 (*.f64 (sqrt.f64 (/.f64 1 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))))) (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) (*.f64 b b))) (*.f64 1/65536 (*.f64 (sqrt.f64 (/.f64 1 (pow.f64 (expm1.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) 5))) (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (neg.f64 (log.f64 b))))) 3) (pow.f64 b 6)))))))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (*.f64 b b))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (*.f64 b b))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (*.f64 b b))
(*.f64 16 (pow.f64 b 2))
(*.f64 16 (*.f64 b b))
(-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) 1)
(*.f64 16 (*.f64 b b))
(-.f64 (+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b)))))) 1)
(*.f64 16 (*.f64 b b))
(-.f64 (+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b)))))) 1)
(*.f64 16 (*.f64 b b))
(-.f64 (+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b)))))) 1)
(*.f64 16 (*.f64 b b))
(-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1)
(*.f64 16 (*.f64 b b))
(-.f64 (+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b)))))) 1)
(*.f64 16 (*.f64 b b))
(-.f64 (+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b)))))) 1)
(*.f64 16 (*.f64 b b))
(-.f64 (+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b)))))) 1)
(*.f64 16 (*.f64 b b))
1
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 16 (pow.f64 b 2)) 1)
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 16 (pow.f64 b 2)) 1)
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 16 (pow.f64 b 2)) 1)
(*.f64 16 (*.f64 b b))
(exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b)))))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 1 b))))))
(*.f64 16 (*.f64 b b))
(exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b)))))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 1/16 (/.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) (pow.f64 b 2))) (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))))
(*.f64 16 (*.f64 b b))
(+.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 0)
(*.f64 16 (*.f64 b b))
(+.f64 0 (log1p.f64 (*.f64 b (*.f64 b 16))))
(*.f64 16 (*.f64 b b))
(+.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(*.f64 16 (*.f64 b b))
(+.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(*.f64 16 (*.f64 b b))
(+.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)))
(*.f64 16 (*.f64 b b))
(+.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) -1)
(*.f64 16 (*.f64 b b))
(+.f64 (+.f64 0 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(*.f64 16 (*.f64 b b))
(+.f64 (+.f64 0 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 1 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 1 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 1 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (*.f64 1 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 1) (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 1))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) 1) (*.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 1))
(*.f64 16 (*.f64 b b))
(-.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) 1)
(*.f64 16 (*.f64 b b))
(-.f64 (+.f64 0 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) 1)
(*.f64 16 (*.f64 b b))
(*.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 1)
(*.f64 16 (*.f64 b b))
(*.f64 1 (log1p.f64 (*.f64 b (*.f64 b 16))))
(*.f64 16 (*.f64 b b))
(*.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(*.f64 16 (*.f64 b b))
(*.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(*.f64 16 (*.f64 b b))
(*.f64 2 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (*.f64 (sqrt.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2))) (*.f64 (cbrt.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) (*.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3/2) (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3/2))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/6) (pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/6))
(*.f64 16 (*.f64 b b))
(/.f64 (-.f64 0 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2)) (-.f64 0 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(*.f64 16 (*.f64 b b))
(/.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))) (-.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))
(*.f64 16 (*.f64 b b))
(/.f64 (-.f64 (*.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (*.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))) (-.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))
(*.f64 16 (*.f64 b b))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) 1) (+.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) 1))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 0 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3)) (+.f64 0 (-.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2) (*.f64 0 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 3) (pow.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 3)) (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 (pow.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) 3) (pow.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) 3)) (+.f64 (*.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (-.f64 (*.f64 (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (log.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (log.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))))
(*.f64 16 (*.f64 b b))
(pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 1)
(*.f64 16 (*.f64 b b))
(pow.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)
(*.f64 16 (*.f64 b b))
(pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 3)
(*.f64 16 (*.f64 b b))
(pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/3)
(*.f64 16 (*.f64 b b))
(sqrt.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2))
(*.f64 16 (*.f64 b b))
(log.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))
(*.f64 16 (*.f64 b b))
(cbrt.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3))
(*.f64 16 (*.f64 b b))
(expm1.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(*.f64 16 (*.f64 b b))
(exp.f64 (log.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(*.f64 16 (*.f64 b b))
(+.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) -1)
(*.f64 16 (*.f64 b b))
(-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)
(*.f64 16 (*.f64 b b))
(*.f64 b 4)
(*.f64 16 (*.f64 b b))
(*.f64 1 (*.f64 b 4))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 b 4) 1)
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 b 4) (pow.f64 1 1/2))
(*.f64 16 (*.f64 b b))
(*.f64 4 b)
(*.f64 16 (*.f64 b b))
(*.f64 (sqrt.f64 (*.f64 b 4)) (sqrt.f64 (*.f64 b 4)))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 4 (sqrt.f64 b)) (sqrt.f64 b))
(*.f64 16 (*.f64 b b))
(*.f64 (sqrt.f64 b) (*.f64 4 (sqrt.f64 b)))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (cbrt.f64 (*.f64 b 4)))
(*.f64 16 (*.f64 b b))
(*.f64 (cbrt.f64 (*.f64 b 4)) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))
(*.f64 16 (*.f64 b b))
(*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (/.f64 1 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))))
(*.f64 16 (*.f64 b b))
(*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)))
(*.f64 16 (*.f64 b b))
(*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)))
(*.f64 16 (*.f64 b b))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (/.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 1 1/2) (*.f64 b 4))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) 1/2) (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 1/2))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 1/2) (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) 1/2))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (*.f64 b b) 1/2) (pow.f64 16 1/2))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 16 1/2) (pow.f64 (*.f64 b b) 1/2))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (sqrt.f64 (*.f64 4 (sqrt.f64 b))) (sqrt.f64 (sqrt.f64 b))) (*.f64 (sqrt.f64 (*.f64 4 (sqrt.f64 b))) (sqrt.f64 (sqrt.f64 b))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (sqrt.f64 (sqrt.f64 b)) (sqrt.f64 (*.f64 4 (sqrt.f64 b)))) (*.f64 (sqrt.f64 (sqrt.f64 b)) (sqrt.f64 (*.f64 4 (sqrt.f64 b)))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (cbrt.f64 (*.f64 b 4)))) (*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (cbrt.f64 (*.f64 b 4)))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (cbrt.f64 (sqrt.f64 (*.f64 b 4)))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (cbrt.f64 (sqrt.f64 (*.f64 b 4)))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (*.f64 b 4))) (*.f64 (sqrt.f64 (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (*.f64 b 4))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))) (*.f64 (cbrt.f64 (sqrt.f64 (*.f64 b 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 3/2) (pow.f64 (cbrt.f64 (*.f64 b 4)) 3/2))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/6) (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/6))
(*.f64 16 (*.f64 b b))
(/.f64 1 (/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(*.f64 16 (*.f64 b b))
(/.f64 1 (/.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))))
(*.f64 16 (*.f64 b b))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 1 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 1 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (cbrt.f64 (*.f64 b 4)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (cbrt.f64 (*.f64 b 4)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (pow.f64 1 1/2) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (pow.f64 1 1/2) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) 1) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) 1) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (cbrt.f64 (*.f64 b 4))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) (exp.f64 (log1p.f64 (*.f64 b 4)))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1))
(*.f64 16 (*.f64 b b))
(pow.f64 (*.f64 b (*.f64 b 16)) 1/2)
(*.f64 16 (*.f64 b b))
(pow.f64 (*.f64 b 4) 1)
(*.f64 16 (*.f64 b b))
(pow.f64 (sqrt.f64 (*.f64 b 4)) 2)
(*.f64 16 (*.f64 b b))
(pow.f64 (cbrt.f64 (*.f64 b 4)) 3)
(*.f64 16 (*.f64 b b))
(pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3)
(*.f64 16 (*.f64 b b))
(fabs.f64 (*.f64 b 4))
(*.f64 16 (*.f64 b b))
(log.f64 (exp.f64 (*.f64 b 4)))
(*.f64 16 (*.f64 b b))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b 4))))
(*.f64 16 (*.f64 b b))
(cbrt.f64 (pow.f64 (*.f64 b 4) 3))
(*.f64 16 (*.f64 b b))
(expm1.f64 (log1p.f64 (*.f64 b 4)))
(*.f64 16 (*.f64 b b))
(exp.f64 (log.f64 (*.f64 b 4)))
(*.f64 16 (*.f64 b b))
(log1p.f64 (expm1.f64 (*.f64 b 4)))
(*.f64 16 (*.f64 b b))
(+.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)
(*.f64 16 (*.f64 b b))
(+.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) -1))
(*.f64 16 (*.f64 b b))
(+.f64 1 (-.f64 (*.f64 b (*.f64 b 16)) 1))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 b (*.f64 b 16)) 0)
(*.f64 16 (*.f64 b b))
(+.f64 0 (*.f64 b (*.f64 b 16)))
(*.f64 16 (*.f64 b b))
(+.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) -2)
(*.f64 16 (*.f64 b b))
(+.f64 -1 (+.f64 1 (*.f64 b (*.f64 b 16))))
(*.f64 16 (*.f64 b b))
(+.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (neg.f64 (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(+.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (neg.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))))
(*.f64 16 (*.f64 b b))
(+.f64 (+.f64 -1 (*.f64 b (*.f64 b 16))) 1)
(*.f64 16 (*.f64 b b))
(*.f64 b (*.f64 b 16))
(*.f64 16 (*.f64 b b))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 b 16) b)
(*.f64 16 (*.f64 b b))
(*.f64 1 (*.f64 b (*.f64 b 16)))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 b (*.f64 b 16)) 1)
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 b 4) (*.f64 b 4))
(*.f64 16 (*.f64 b b))
(*.f64 (sqrt.f64 (*.f64 b 4)) (*.f64 (*.f64 b 4) (sqrt.f64 (*.f64 b 4))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 4 (sqrt.f64 b)) (*.f64 b (*.f64 4 (sqrt.f64 b))))
(*.f64 16 (*.f64 b b))
(*.f64 (sqrt.f64 b) (*.f64 (*.f64 b 16) (sqrt.f64 b)))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (pow.f64 (cbrt.f64 (*.f64 b 4)) 4))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4))))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))
(*.f64 16 (*.f64 b b))
(*.f64 (cbrt.f64 (*.f64 b 4)) (*.f64 (*.f64 b 4) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)))
(*.f64 16 (*.f64 b b))
(*.f64 (cbrt.f64 (*.f64 b 16)) (*.f64 b (cbrt.f64 (pow.f64 (*.f64 b 16) 2))))
(*.f64 16 (*.f64 b b))
(*.f64 (cbrt.f64 (pow.f64 (*.f64 b 16) 2)) (*.f64 b (cbrt.f64 (*.f64 b 16))))
(*.f64 16 (*.f64 b b))
(*.f64 (cbrt.f64 b) (*.f64 (*.f64 b 16) (pow.f64 (cbrt.f64 b) 2)))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (cbrt.f64 b) 2) (*.f64 (*.f64 b 16) (cbrt.f64 b)))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 b b) 16)
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 b b) (*.f64 (pow.f64 16 1/2) (pow.f64 16 1/2)))
(*.f64 16 (*.f64 b b))
(*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(*.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(*.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (/.f64 1 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (*.f64 b 4) (sqrt.f64 (*.f64 b 4))) (sqrt.f64 (*.f64 b 4)))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 b (*.f64 4 (sqrt.f64 b))) (*.f64 4 (sqrt.f64 b)))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 b (cbrt.f64 (pow.f64 (*.f64 b 16) 2))) (cbrt.f64 (*.f64 b 16)))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (*.f64 b 16) (sqrt.f64 b)) (sqrt.f64 b))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (*.f64 b 16) (pow.f64 (cbrt.f64 b) 2)) (cbrt.f64 b))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (*.f64 b 4) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (cbrt.f64 (*.f64 b 4)))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (*.f64 b 16) (cbrt.f64 b)) (pow.f64 (cbrt.f64 b) 2))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 b (cbrt.f64 (*.f64 b 16))) (cbrt.f64 (pow.f64 (*.f64 b 16) 2)))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4))) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))
(*.f64 16 (*.f64 b b))
(*.f64 (+.f64 1 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (+.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) -1))
(*.f64 16 (*.f64 b b))
(*.f64 (+.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) -1) (+.f64 1 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(*.f64 16 (*.f64 b b))
(*.f64 (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))
(*.f64 16 (*.f64 b b))
(*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))
(*.f64 16 (*.f64 b b))
(*.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) 1) (/.f64 1 (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(*.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (/.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))))
(*.f64 16 (*.f64 b b))
(*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (*.f64 b (*.f64 b 16)))
(*.f64 16 (*.f64 b b))
(*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (-.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2))) (neg.f64 (*.f64 b (*.f64 b 16))))
(*.f64 16 (*.f64 b b))
(*.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (+.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) (*.f64 256 (pow.f64 b 4)))))
(*.f64 16 (*.f64 b b))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (-.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 2))) (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) (*.f64 256 (pow.f64 b 4))) 1))
(*.f64 16 (*.f64 b b))
(*.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) 3) (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 3))) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) (*.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (pow.f64 1 1/2) (pow.f64 1 1/2)) (*.f64 b (*.f64 b 16)))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)) (pow.f64 (cbrt.f64 (*.f64 b 4)) 2)))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4))) (*.f64 (cbrt.f64 (*.f64 b 4)) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (cbrt.f64 (*.f64 b 4))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (cbrt.f64 (*.f64 b 4))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))) (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2))))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 3/2) (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 3/2))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (*.f64 256 (pow.f64 b 4)) 1/4) (pow.f64 (*.f64 256 (pow.f64 b 4)) 1/4))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 6) 1/6) (pow.f64 (pow.f64 (*.f64 b 4) 6) 1/6))
(*.f64 16 (*.f64 b b))
(/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16))))
(*.f64 16 (*.f64 b b))
(/.f64 1 (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))
(*.f64 16 (*.f64 b b))
(/.f64 1 (/.f64 (/.f64 1 (*.f64 b (*.f64 b 16))) 1))
(*.f64 16 (*.f64 b b))
(/.f64 1 (/.f64 (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (+.f64 (neg.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) 1)))
(*.f64 16 (*.f64 b b))
(/.f64 1 (/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (neg.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 b (*.f64 b 16)) 1)
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (+.f64 (*.f64 b (*.f64 b 16)) 2))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (/.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (*.f64 b (*.f64 b 16))))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (+.f64 1 (-.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1))))
(*.f64 16 (*.f64 b b))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(*.f64 16 (*.f64 b b))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(*.f64 16 (*.f64 b b))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (/.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (/.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (/.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))))
(*.f64 16 (*.f64 b b))
(/.f64 (-.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (-.f64 -1 (+.f64 1 (*.f64 b (*.f64 b 16)))))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) -1) (*.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) -1) (*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) -1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) 3) -1) (*.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)))))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 3) -1) (*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 3) -1) (*.f64 (-.f64 (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) (*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) 1) (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (*.f64 b 4) (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (*.f64 b 4) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 4) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (+.f64 (neg.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)) 1) 1) (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (neg.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) 1) (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (*.f64 b 4)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (*.f64 b 4)) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (pow.f64 (cbrt.f64 (*.f64 b 4)) 4)) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))) (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4)))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b 4)))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) -1) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2))) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) 3) -1) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2))) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 4) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) -1) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (+.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 3) -1) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 6) (+.f64 1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))))
(*.f64 16 (*.f64 b b))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) 1) (+.f64 (*.f64 b (*.f64 b 16)) 2))
(*.f64 16 (*.f64 b b))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))) (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (*.f64 (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (cbrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) 1) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (*.f64 (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))) (cbrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (*.f64 (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (+.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (*.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))) (+.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))))
(*.f64 16 (*.f64 b b))
(pow.f64 (*.f64 b (*.f64 b 16)) 1)
(*.f64 16 (*.f64 b b))
(pow.f64 (*.f64 b 4) 2)
(*.f64 16 (*.f64 b b))
(pow.f64 (sqrt.f64 (*.f64 b 4)) 4)
(*.f64 16 (*.f64 b b))
(pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) 3)
(*.f64 16 (*.f64 b b))
(pow.f64 (cbrt.f64 (*.f64 b 4)) 6)
(*.f64 16 (*.f64 b b))
(pow.f64 (*.f64 256 (pow.f64 b 4)) 1/2)
(*.f64 16 (*.f64 b b))
(pow.f64 (pow.f64 (*.f64 b 4) 6) 1/3)
(*.f64 16 (*.f64 b b))
(pow.f64 (pow.f64 (*.f64 b 4) 3) 2/3)
(*.f64 16 (*.f64 b b))
(neg.f64 (/.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1) (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(neg.f64 (/.f64 (+.f64 -1 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3)) (neg.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))))
(*.f64 16 (*.f64 b b))
(sqrt.f64 (*.f64 256 (pow.f64 b 4)))
(*.f64 16 (*.f64 b b))
(log.f64 (pow.f64 (pow.f64 (exp.f64 16) b) b))
(*.f64 16 (*.f64 b b))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 b 16)))))
(*.f64 16 (*.f64 b b))
(cbrt.f64 (pow.f64 (*.f64 b 4) 6))
(*.f64 16 (*.f64 b b))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b 16) 3) (pow.f64 b 3)))
(*.f64 16 (*.f64 b b))
(expm1.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))
(*.f64 16 (*.f64 b b))
(exp.f64 (*.f64 (log.f64 (*.f64 b 4)) 2))
(*.f64 16 (*.f64 b b))
(log1p.f64 (expm1.f64 (*.f64 b (*.f64 b 16))))
(*.f64 16 (*.f64 b b))
(fma.f64 1 (+.f64 1 (*.f64 b (*.f64 b 16))) -1)
(*.f64 16 (*.f64 b b))
(fma.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) -1)
(*.f64 16 (*.f64 b b))
(fma.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2) (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) -1)
(*.f64 16 (*.f64 b b))
(+.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 0)
(*.f64 16 (*.f64 b b))
(+.f64 1 (*.f64 b (*.f64 b 16)))
(*.f64 16 (*.f64 b b))
(+.f64 (*.f64 b (*.f64 b 16)) 1)
(*.f64 16 (*.f64 b b))
(+.f64 0 (+.f64 1 (*.f64 b (*.f64 b 16))))
(*.f64 16 (*.f64 b b))
(+.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) -1)
(*.f64 16 (*.f64 b b))
(+.f64 -1 (+.f64 (*.f64 b (*.f64 b 16)) 2))
(*.f64 16 (*.f64 b b))
(-.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 0)
(*.f64 16 (*.f64 b b))
(-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 1)
(*.f64 16 (*.f64 b b))
(-.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)) (-.f64 (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1))
(*.f64 16 (*.f64 b b))
(-.f64 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (-.f64 (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) 1))
(*.f64 16 (*.f64 b b))
(-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))) (/.f64 1 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(-.f64 (+.f64 1 (/.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2)))) (/.f64 1 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) (+.f64 (*.f64 b (*.f64 b 16)) 2))))
(*.f64 16 (*.f64 b b))
(*.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 1)
(*.f64 16 (*.f64 b b))
(*.f64 1 (+.f64 1 (*.f64 b (*.f64 b 16))))
(*.f64 16 (*.f64 b b))
(*.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))
(*.f64 16 (*.f64 b b))
(*.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2) (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))
(*.f64 16 (*.f64 b b))
(*.f64 (-.f64 1 (*.f64 256 (pow.f64 b 4))) (/.f64 1 (+.f64 1 (*.f64 -16 (*.f64 b b)))))
(*.f64 16 (*.f64 b b))
(*.f64 (+.f64 1 (pow.f64 (*.f64 b 4) 6)) (/.f64 1 (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16)))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (*.f64 (sqrt.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))) (*.f64 (cbrt.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) (sqrt.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))
(*.f64 16 (*.f64 b b))
(*.f64 (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))) (*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))))
(*.f64 16 (*.f64 b b))
(*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1) (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3/2) (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3/2))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (E.f64) (/.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2)) (pow.f64 (E.f64) (/.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 2)))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 1/6) (pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 1/6))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (/.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (/.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)))
(*.f64 16 (*.f64 b b))
(*.f64 (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (/.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (/.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)))
(*.f64 16 (*.f64 b b))
(/.f64 1 (/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 256 (pow.f64 b 4)))))
(*.f64 16 (*.f64 b b))
(/.f64 1 (/.f64 (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16))) (+.f64 1 (pow.f64 (*.f64 b 4) 6))))
(*.f64 16 (*.f64 b b))
(/.f64 (-.f64 1 (*.f64 256 (pow.f64 b 4))) (+.f64 1 (*.f64 -16 (*.f64 b b))))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 1 (pow.f64 (*.f64 b 4) 6)) (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16))))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 1 (pow.f64 (*.f64 b 4) 6)) (+.f64 (*.f64 256 (pow.f64 b 4)) (+.f64 1 (*.f64 -16 (*.f64 b b)))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 1 (-.f64 1 (*.f64 256 (pow.f64 b 4)))) (+.f64 1 (*.f64 -16 (*.f64 b b))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 1 (+.f64 1 (pow.f64 (*.f64 b 4) 6))) (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (-.f64 1 (*.f64 256 (pow.f64 b 4))) 1) (+.f64 1 (*.f64 -16 (*.f64 b b))))
(*.f64 16 (*.f64 b b))
(/.f64 (*.f64 (+.f64 1 (pow.f64 (*.f64 b 4) 6)) 1) (+.f64 1 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 b 16) 2) 16))))
(*.f64 16 (*.f64 b b))
(/.f64 (-.f64 (*.f64 256 (pow.f64 b 4)) 1) (-.f64 (*.f64 b (*.f64 b 16)) 1))
(*.f64 16 (*.f64 b b))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 2) 1) (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) -1))
(*.f64 16 (*.f64 b b))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 2) 1) (+.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 1))
(*.f64 16 (*.f64 b b))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 3) -1) (+.f64 (pow.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2) 2) (-.f64 1 (neg.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))))
(*.f64 16 (*.f64 b b))
(pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 1)
(*.f64 16 (*.f64 b b))
(pow.f64 (sqrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 2)
(*.f64 16 (*.f64 b b))
(pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3)
(*.f64 16 (*.f64 b b))
(pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 b 16))))
(*.f64 16 (*.f64 b b))
(pow.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3) 1/3)
(*.f64 16 (*.f64 b b))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 2)) (cbrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(*.f64 16 (*.f64 b b))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) (sqrt.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))
(*.f64 16 (*.f64 b b))
(sqrt.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2))
(*.f64 16 (*.f64 b b))
(log.f64 (exp.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))
(*.f64 16 (*.f64 b b))
(log.f64 (+.f64 1 (expm1.f64 (+.f64 1 (*.f64 b (*.f64 b 16))))))
(*.f64 16 (*.f64 b b))
(cbrt.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 3))
(*.f64 16 (*.f64 b b))
(expm1.f64 (log.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)))
(*.f64 16 (*.f64 b b))
(log1p.f64 (expm1.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))))
(*.f64 16 (*.f64 b b))

localize67.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
98.5%
(/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
90.7%
(*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))
83.0%
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))))
57.1%
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
Compiler

Compiled 127 to 89 computations (29.9% saved)

series37.0ms (0%)

Counts
4 → 144
Calls

36 calls:

TimeVariablePointExpression
2.0ms
angle
@-inf
(/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
2.0ms
x-scale
@inf
(*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))
2.0ms
angle
@-inf
(*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))
2.0ms
x-scale
@0
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))))
2.0ms
b
@-inf
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))))

rewrite183.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1410×associate-/r/
470×add-sqr-sqrt
458×pow1
458×*-un-lft-identity
432×add-exp-log
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
023180
1474180
26043180
Stop Event
node limit
Counts
4 → 164
Calls
Call 1
Inputs
(cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))))
(*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))
(/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
Outputs
(((-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 1 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (sqrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (sqrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((log.f64 (exp.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((cbrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 2)) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) 1) (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (neg.f64 (sqrt.f64 2))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) x-scale) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((sqrt.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((log.f64 (pow.f64 (exp.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 x-scale 3) (pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3) (pow.f64 x-scale 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((exp.f64 (log.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 1 (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (neg.f64 (sqrt.f64 2))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (*.f64 (neg.f64 (sqrt.f64 2)) (*.f64 y-scale (sqrt.f64 8))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) x-scale) (/.f64 (/.f64 1 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((/.f64 (neg.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((sqrt.f64 (*.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)) (*.f64 8 (*.f64 y-scale y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 y-scale) (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 8)) 3) (pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3) (pow.f64 (*.f64 y-scale (sqrt.f64 8)) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((exp.f64 (log.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (sqrt.f64 2) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (/.f64 (sqrt.f64 2) x-scale)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 1 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (sqrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 2 1/4) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (cbrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (cbrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (cbrt.f64 2) (*.f64 (cbrt.f64 (sqrt.f64 2)) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (neg.f64 (sqrt.f64 2)) (*.f64 -1 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) 1) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2)) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) 1) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (sqrt.f64 x-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (cbrt.f64 x-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 1 x-scale) (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 1 x-scale) (*.f64 (/.f64 (sqrt.f64 2) (/.f64 1 b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (*.f64 1 (sqrt.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (/.f64 (sqrt.f64 2) (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) b) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) (neg.f64 x-scale)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (*.f64 1 (/.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) x-scale)) (*.f64 (sqrt.f64 2) b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 1 (neg.f64 x-scale)) (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (*.f64 -1 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (neg.f64 (sqrt.f64 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (pow.f64 2 1/4) 1) (*.f64 (/.f64 (pow.f64 2 1/4) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (pow.f64 2 1/4) x-scale) (*.f64 (/.f64 (pow.f64 2 1/4) (/.f64 1 b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (cbrt.f64 2) 1) (*.f64 (/.f64 (cbrt.f64 (sqrt.f64 2)) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (*.f64 (/.f64 (pow.f64 2 1/4) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (pow.f64 2 1/4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (pow.f64 2 1/4) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (/.f64 (pow.f64 2 1/4) (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (cbrt.f64 2) x-scale) (*.f64 (/.f64 (cbrt.f64 (sqrt.f64 2)) (/.f64 1 b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (cbrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (/.f64 (cbrt.f64 (sqrt.f64 2)) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (cbrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale 1)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1)) b) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 b))) (sqrt.f64 b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (*.f64 b b)))) (cbrt.f64 b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) -1) (neg.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) (neg.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (neg.f64 b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (sqrt.f64 2) (neg.f64 (neg.f64 x-scale))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 1 (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (pow.f64 2 1/4))) (pow.f64 2 1/4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 1 (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 2))) (cbrt.f64 (sqrt.f64 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (cbrt.f64 2) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (cbrt.f64 (sqrt.f64 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) 1) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) 1) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) b) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1 b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1 (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) -1) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 2)) -1) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 2)) (neg.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) b) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (neg.f64 (sqrt.f64 2)) (neg.f64 (neg.f64 x-scale))) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) 1) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) 1) (/.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (sqrt.f64 x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (sqrt.f64 x-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (cbrt.f64 x-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) b) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (neg.f64 x-scale)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale 1)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1)) b) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 b))) (sqrt.f64 b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (*.f64 b b)))) (cbrt.f64 b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) -1) (neg.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (neg.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (neg.f64 b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (neg.f64 (neg.f64 x-scale))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 1) (sqrt.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 x-scale)) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 (neg.f64 x-scale))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) 1) (cbrt.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 x-scale)) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (neg.f64 x-scale))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((*.f64 (/.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (cbrt.f64 b)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((pow.f64 (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2)) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((neg.f64 (*.f64 (/.f64 (sqrt.f64 2) (neg.f64 x-scale)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((sqrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((log.f64 (pow.f64 (exp.f64 (sqrt.f64 2)) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((cbrt.f64 (/.f64 (*.f64 2 (sqrt.f64 2)) (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((exp.f64 (log.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) #f)))

simplify212.0ms (0.2%)

Algorithm
egg-herbie
Rules
1206×associate-*l*
870×*-commutative
650×associate-/l*
598×associate-*l/
584×distribute-lft-neg-in
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
052416268
1152216146
2639816102
Stop Event
node limit
Counts
308 → 288
Calls
Call 1
Inputs
1
(+.f64 1 (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 (*.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 -1/64800 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))))))
(+.f64 (*.f64 1/25194240000 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))))))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 -1/64800 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))))))))
(+.f64 (*.f64 1/25194240000 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))))))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (+.f64 (*.f64 -1/64800 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))))) (*.f64 -1/24488801280000000 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 6) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 6))))))))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) x-scale)
(+.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) x-scale) (*.f64 -1/64800 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))))) x-scale)))
(+.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) x-scale) (+.f64 (*.f64 -1/64800 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))))) x-scale)) (*.f64 1/25194240000 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4)))))) x-scale))))
(+.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) x-scale) (+.f64 (*.f64 -1/64800 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))))) x-scale)) (+.f64 (*.f64 -1/24488801280000000 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 6) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 6)))))) x-scale)) (*.f64 1/25194240000 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4)))))) x-scale)))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) b) x-scale)
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) b) x-scale) (*.f64 -1/64800 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2)))) x-scale)))
(+.f64 (*.f64 1/25194240000 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 b (pow.f64 (PI.f64) 4)))) x-scale)) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) b) x-scale) (*.f64 -1/64800 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2)))) x-scale))))
(+.f64 (*.f64 1/25194240000 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 b (pow.f64 (PI.f64) 4)))) x-scale)) (+.f64 (*.f64 -1/24488801280000000 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 6) (*.f64 b (pow.f64 (PI.f64) 6)))) x-scale)) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) b) x-scale) (*.f64 -1/64800 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2)))) x-scale)))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 1)
(*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 1)
(*.f64 1 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(*.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 1)
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3)
(pow.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) 1/3)
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))
(log.f64 (exp.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))) 1)
(/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2)))
(/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 2)) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) 1) (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2)))
(/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (neg.f64 (sqrt.f64 2))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) x-scale) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 1)
(pow.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))) 2)
(pow.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))) 3)
(pow.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 2))
(log.f64 (pow.f64 (exp.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))))
(cbrt.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 3))
(cbrt.f64 (*.f64 (pow.f64 x-scale 3) (pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3)))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3) (pow.f64 x-scale 3)))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))))
(exp.f64 (log.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))) 1))
(log1p.f64 (expm1.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) 1)
(/.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2)))
(/.f64 1 (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (neg.f64 (sqrt.f64 2))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 2)) (*.f64 y-scale (sqrt.f64 8))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(/.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) x-scale) (/.f64 (/.f64 1 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) b))
(/.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(/.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(/.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(/.f64 (neg.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 1)
(pow.f64 (sqrt.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 2)
(pow.f64 (cbrt.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 3)
(pow.f64 (pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3) 1/3)
(sqrt.f64 (*.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)) (*.f64 8 (*.f64 y-scale y-scale))))
(log.f64 (pow.f64 (pow.f64 (exp.f64 y-scale) (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(cbrt.f64 (pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 8)) 3) (pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3)))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3) (pow.f64 (*.f64 y-scale (sqrt.f64 8)) 3)))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(exp.f64 (log.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 1))
(log1p.f64 (expm1.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 1)
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (/.f64 (sqrt.f64 2) x-scale))
(*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1)
(*.f64 1 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (sqrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 2 1/4) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (cbrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(*.f64 (cbrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (cbrt.f64 2) (*.f64 (cbrt.f64 (sqrt.f64 2)) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))
(*.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2))
(*.f64 (neg.f64 (sqrt.f64 2)) (*.f64 -1 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) 1) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2)) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (/.f64 (sqrt.f64 2) 1) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1))
(*.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (sqrt.f64 x-scale)))
(*.f64 (/.f64 (sqrt.f64 2) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (cbrt.f64 x-scale)))
(*.f64 (/.f64 1 x-scale) (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (/.f64 1 x-scale) (*.f64 (/.f64 (sqrt.f64 2) (/.f64 1 b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (*.f64 1 (sqrt.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (/.f64 (sqrt.f64 2) (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) b)
(*.f64 (/.f64 (sqrt.f64 2) (neg.f64 x-scale)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b)))
(*.f64 (*.f64 1 (/.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) x-scale)) (*.f64 (sqrt.f64 2) b))
(*.f64 (/.f64 1 (neg.f64 x-scale)) (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))))
(*.f64 (*.f64 -1 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (neg.f64 (sqrt.f64 2)))
(*.f64 (/.f64 (pow.f64 2 1/4) 1) (*.f64 (/.f64 (pow.f64 2 1/4) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (/.f64 (pow.f64 2 1/4) x-scale) (*.f64 (/.f64 (pow.f64 2 1/4) (/.f64 1 b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (/.f64 (cbrt.f64 2) 1) (*.f64 (/.f64 (cbrt.f64 (sqrt.f64 2)) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (*.f64 (/.f64 (pow.f64 2 1/4) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (pow.f64 2 1/4))
(*.f64 (/.f64 (pow.f64 2 1/4) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (/.f64 (pow.f64 2 1/4) (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 (/.f64 (cbrt.f64 2) x-scale) (*.f64 (/.f64 (cbrt.f64 (sqrt.f64 2)) (/.f64 1 b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (/.f64 (cbrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (/.f64 (cbrt.f64 (sqrt.f64 2)) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 (/.f64 (cbrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale 1)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1)) b)
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 b))) (sqrt.f64 b))
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (*.f64 b b)))) (cbrt.f64 b))
(*.f64 (/.f64 (sqrt.f64 2) -1) (neg.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (/.f64 (sqrt.f64 2) (neg.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (neg.f64 b))
(*.f64 (/.f64 (sqrt.f64 2) (neg.f64 (neg.f64 x-scale))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))))
(*.f64 (/.f64 1 (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (pow.f64 2 1/4))) (pow.f64 2 1/4))
(*.f64 (/.f64 1 (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 2))) (cbrt.f64 (sqrt.f64 2)))
(*.f64 (/.f64 (cbrt.f64 2) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (cbrt.f64 (sqrt.f64 2)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) 1) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) 1) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) 1))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) b)
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1 b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1 (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) -1) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b)))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 2)) -1) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 2)) (neg.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) b)
(*.f64 (/.f64 (neg.f64 (sqrt.f64 2)) (neg.f64 (neg.f64 x-scale))) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) 1) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) 1) (/.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (sqrt.f64 x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (sqrt.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (cbrt.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) b)
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (neg.f64 x-scale)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale 1)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1)) b)
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 b))) (sqrt.f64 b))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (*.f64 b b)))) (cbrt.f64 b))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) -1) (neg.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (neg.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (neg.f64 b))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (neg.f64 (neg.f64 x-scale))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 1) (sqrt.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 x-scale)) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 (neg.f64 x-scale))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 b))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) 1) (cbrt.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 x-scale)) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (neg.f64 x-scale))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (cbrt.f64 b))
(pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1)
(pow.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 2)
(pow.f64 (cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3)
(pow.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3) 1/3)
(pow.f64 (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2)) -1)
(neg.f64 (*.f64 (/.f64 (sqrt.f64 2) (neg.f64 x-scale)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(sqrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 2)) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(cbrt.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3))
(cbrt.f64 (/.f64 (*.f64 2 (sqrt.f64 2)) (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3)))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(exp.f64 (log.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 1))
(log1p.f64 (expm1.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
Outputs
1
(+.f64 1 (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (*.f64 (*.f64 -1/64800 (*.f64 angle angle)) (pow.f64 (PI.f64) 2)))
(fma.f64 -1/64800 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2)) 1)
(+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 1 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 (*.f64 -1/64800 (*.f64 angle angle)) (pow.f64 (PI.f64) 2))))
(+.f64 1 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 (pow.f64 (PI.f64) 2) (*.f64 -1/64800 (*.f64 angle angle)))))
(+.f64 (*.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(fma.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6)) (+.f64 1 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 (*.f64 -1/64800 (*.f64 angle angle)) (pow.f64 (PI.f64) 2)))))
(+.f64 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 (pow.f64 (PI.f64) 2) (*.f64 -1/64800 (*.f64 angle angle)))) (fma.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6)) 1))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 b (sqrt.f64 8)))
(*.f64 y-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 -1/64800 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))))))
(fma.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))) (*.f64 -1/64800 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 8))))))
(fma.f64 -1/64800 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 b (sqrt.f64 8))) (*.f64 (*.f64 angle angle) y-scale))) (*.f64 y-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (+.f64 (*.f64 b (sqrt.f64 8)) (*.f64 (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) 2) (*.f64 b (sqrt.f64 8)))) -1/64800)))
(+.f64 (*.f64 1/25194240000 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))))))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 -1/64800 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 1/25194240000 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (pow.f64 angle 4) b) (*.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)))) (fma.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))) (*.f64 -1/64800 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 8)))))))
(fma.f64 1/25194240000 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 (*.f64 (pow.f64 (PI.f64) 4) (*.f64 b (sqrt.f64 8))) y-scale))) (fma.f64 -1/64800 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 b (sqrt.f64 8))) (*.f64 (*.f64 angle angle) y-scale))) (*.f64 y-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)))))
(fma.f64 1/25194240000 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 (*.f64 (pow.f64 (PI.f64) 4) (*.f64 b (sqrt.f64 8))) y-scale))) (*.f64 (*.f64 (sqrt.f64 2) y-scale) (+.f64 (*.f64 b (sqrt.f64 8)) (*.f64 (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) 2) (*.f64 b (sqrt.f64 8)))) -1/64800))))
(+.f64 (*.f64 1/25194240000 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))))))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (+.f64 (*.f64 -1/64800 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))))) (*.f64 -1/24488801280000000 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 6) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 6))))))))))
(fma.f64 1/25194240000 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (pow.f64 angle 4) b) (*.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)))) (fma.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))) (fma.f64 -1/64800 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 8)))) (*.f64 (*.f64 -1/24488801280000000 y-scale) (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 6)) (*.f64 (*.f64 b (sqrt.f64 8)) (pow.f64 (PI.f64) 6)))))))
(fma.f64 1/25194240000 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 (*.f64 (pow.f64 (PI.f64) 4) (*.f64 b (sqrt.f64 8))) y-scale))) (fma.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))) (fma.f64 -1/64800 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 b (sqrt.f64 8))) (*.f64 (*.f64 angle angle) y-scale))) (*.f64 -1/24488801280000000 (*.f64 (*.f64 b (*.f64 (*.f64 (pow.f64 (PI.f64) 6) (sqrt.f64 8)) (pow.f64 angle 6))) (*.f64 (sqrt.f64 2) y-scale))))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (+.f64 (*.f64 b (sqrt.f64 8)) (*.f64 (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) 2) (*.f64 b (sqrt.f64 8)))) -1/64800))) (*.f64 (*.f64 (sqrt.f64 2) y-scale) (+.f64 (*.f64 (*.f64 b (*.f64 (*.f64 (pow.f64 (PI.f64) 6) (sqrt.f64 8)) (pow.f64 angle 6))) -1/24488801280000000) (*.f64 (*.f64 (pow.f64 angle 4) (*.f64 (pow.f64 (PI.f64) 4) (*.f64 b (sqrt.f64 8)))) 1/25194240000))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) x-scale)
(/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 b (sqrt.f64 8))) x-scale)
(*.f64 (/.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)))
(+.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) x-scale) (*.f64 -1/64800 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))))) x-scale)))
(+.f64 (/.f64 y-scale (/.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (*.f64 -1/64800 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 8))))))))
(fma.f64 -1/64800 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 b (sqrt.f64 8))) (*.f64 (*.f64 angle angle) y-scale))) (*.f64 (/.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b))))
(+.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) x-scale) (+.f64 (*.f64 -1/64800 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))))) x-scale)) (*.f64 1/25194240000 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4)))))) x-scale))))
(+.f64 (/.f64 y-scale (/.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (fma.f64 -1/64800 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 8)))))) (*.f64 1/25194240000 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (pow.f64 angle 4) b) (*.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)))) x-scale))))
(+.f64 (*.f64 (/.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b))) (fma.f64 -1/64800 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 b (sqrt.f64 8))) (*.f64 (*.f64 angle angle) y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 angle 4) (*.f64 (*.f64 (pow.f64 (PI.f64) 4) (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) (*.f64 1/25194240000 y-scale)) x-scale)))
(+.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))) x-scale) (+.f64 (*.f64 -1/64800 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 2) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))))) x-scale)) (+.f64 (*.f64 -1/24488801280000000 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 6) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 6)))))) x-scale)) (*.f64 1/25194240000 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 angle 4) (*.f64 b (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4)))))) x-scale)))))
(+.f64 (/.f64 y-scale (/.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) (fma.f64 -1/64800 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 8)))))) (fma.f64 -1/24488801280000000 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 angle 6) (*.f64 (*.f64 b (sqrt.f64 8)) (pow.f64 (PI.f64) 6)))))) (*.f64 1/25194240000 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (pow.f64 angle 4) b) (*.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)))) x-scale)))))
(+.f64 (fma.f64 -1/64800 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (*.f64 (pow.f64 (PI.f64) 2) (*.f64 b (sqrt.f64 8))) (*.f64 (*.f64 angle angle) y-scale))) (*.f64 (/.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) b)))) (fma.f64 -1/24488801280000000 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 y-scale (*.f64 b (*.f64 (*.f64 (pow.f64 (PI.f64) 6) (sqrt.f64 8)) (pow.f64 angle 6))))) (/.f64 (*.f64 (*.f64 (pow.f64 angle 4) (*.f64 (*.f64 (pow.f64 (PI.f64) 4) (*.f64 b (sqrt.f64 8))) (sqrt.f64 2))) (*.f64 1/25194240000 y-scale)) x-scale)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))) x-scale)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) b) x-scale)
(*.f64 b (/.f64 (sqrt.f64 2) x-scale))
(/.f64 (sqrt.f64 2) (/.f64 x-scale b))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) b) x-scale) (*.f64 -1/64800 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2)))) x-scale)))
(+.f64 (*.f64 -1/64800 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 angle angle)) (*.f64 (pow.f64 (PI.f64) 2) b)) x-scale)) (*.f64 b (/.f64 (sqrt.f64 2) x-scale)))
(fma.f64 -1/64800 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (pow.f64 (PI.f64) 2) (*.f64 angle (*.f64 angle b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(+.f64 (*.f64 1/25194240000 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 b (pow.f64 (PI.f64) 4)))) x-scale)) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) b) x-scale) (*.f64 -1/64800 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2)))) x-scale))))
(fma.f64 1/25194240000 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (*.f64 (pow.f64 angle 4) b) (pow.f64 (PI.f64) 4)))) (+.f64 (*.f64 -1/64800 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 angle angle)) (*.f64 (pow.f64 (PI.f64) 2) b)) x-scale)) (*.f64 b (/.f64 (sqrt.f64 2) x-scale))))
(fma.f64 1/25194240000 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (pow.f64 angle 4) (*.f64 (pow.f64 (PI.f64) 4) b))) (fma.f64 -1/64800 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (pow.f64 (PI.f64) 2) (*.f64 angle (*.f64 angle b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b))))
(+.f64 (*.f64 1/25194240000 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 b (pow.f64 (PI.f64) 4)))) x-scale)) (+.f64 (*.f64 -1/24488801280000000 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 6) (*.f64 b (pow.f64 (PI.f64) 6)))) x-scale)) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) b) x-scale) (*.f64 -1/64800 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2)))) x-scale)))))
(fma.f64 1/25194240000 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (*.f64 (pow.f64 angle 4) b) (pow.f64 (PI.f64) 4)))) (fma.f64 -1/24488801280000000 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 6)) (*.f64 (pow.f64 (PI.f64) 6) b)) x-scale) (+.f64 (*.f64 -1/64800 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 angle angle)) (*.f64 (pow.f64 (PI.f64) 2) b)) x-scale)) (*.f64 b (/.f64 (sqrt.f64 2) x-scale)))))
(fma.f64 1/25194240000 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (pow.f64 angle 4) (*.f64 (pow.f64 (PI.f64) 4) b))) (fma.f64 -1/24488801280000000 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (pow.f64 (PI.f64) 6) (*.f64 (pow.f64 angle 6) b))) (fma.f64 -1/64800 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (pow.f64 (PI.f64) 2) (*.f64 angle (*.f64 angle b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 1)
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 1)
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(*.f64 1 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) 2)))
(*.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) (cbrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) 2)))
(pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 1)
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(pow.f64 (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3)
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(pow.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3) 1/3)
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) 2))
(fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))
(log.f64 (exp.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(cbrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 3))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))) 1)
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2)))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 2)) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) 1) (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2)))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (neg.f64 (sqrt.f64 2))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) (neg.f64 (sqrt.f64 2))))) (neg.f64 x-scale)) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (/.f64 (neg.f64 x-scale) (neg.f64 (sqrt.f64 2)))))
(*.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 x-scale (/.f64 (neg.f64 x-scale) (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (neg.f64 y-scale))))))
(/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) x-scale) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 1)
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(pow.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))) 2)
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))) 3)
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(pow.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 3) 1/3)
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 2))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8)))) 2))
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))))
(log.f64 (pow.f64 (exp.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))))))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(cbrt.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 3))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(cbrt.f64 (*.f64 (pow.f64 x-scale 3) (pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3)))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3) (pow.f64 x-scale 3)))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(exp.f64 (log.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))) 1))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(log1p.f64 (expm1.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 (*.f64 b (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) 1)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2)))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 1 (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 (/.f64 1 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 (/.f64 1 x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (neg.f64 (sqrt.f64 2))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 2)) (*.f64 y-scale (sqrt.f64 8))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) x-scale) (/.f64 (/.f64 1 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) b))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(/.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (*.f64 (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2))))
(*.f64 (/.f64 y-scale (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))) (/.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 8)) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2))))
(/.f64 (neg.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 1)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(pow.f64 (sqrt.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 2)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 3)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(pow.f64 (pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3) 1/3)
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(sqrt.f64 (*.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)) (*.f64 8 (*.f64 y-scale y-scale))))
(sqrt.f64 (/.f64 (*.f64 2 (*.f64 8 (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))
(sqrt.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 16 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2))))
(log.f64 (pow.f64 (pow.f64 (exp.f64 y-scale) (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale))) (log.f64 (pow.f64 (exp.f64 y-scale) (sqrt.f64 8))))
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b))) (*.f64 (sqrt.f64 8) (log.f64 (exp.f64 y-scale))))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(cbrt.f64 (pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 8)) 3) (pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3)))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3) (pow.f64 (*.f64 y-scale (sqrt.f64 8)) 3)))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(exp.f64 (log.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 1))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(log1p.f64 (expm1.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) x-scale)
(/.f64 (sqrt.f64 8) (/.f64 (/.f64 (/.f64 (/.f64 x-scale b) (sqrt.f64 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) y-scale))
(-.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 1)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (sqrt.f64 2) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (/.f64 (sqrt.f64 2) x-scale))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 1 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (sqrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (pow.f64 2 1/4) (*.f64 (pow.f64 2 1/4) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (pow.f64 2 1/4) (*.f64 (*.f64 (pow.f64 2 1/4) (/.f64 b x-scale)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (pow.f64 2 1/2) (/.f64 x-scale b)))
(*.f64 (cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (cbrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))))
(*.f64 (cbrt.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))) (cbrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2))))
(*.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))) (cbrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2))))
(*.f64 (cbrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (cbrt.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))) (cbrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2))))
(*.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))) (cbrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2))))
(*.f64 (cbrt.f64 2) (*.f64 (cbrt.f64 (sqrt.f64 2)) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (cbrt.f64 2) (*.f64 (*.f64 (cbrt.f64 (sqrt.f64 2)) (/.f64 b x-scale)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 b x-scale)) (*.f64 (cbrt.f64 2) (cbrt.f64 (sqrt.f64 2))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (neg.f64 (sqrt.f64 2)) (*.f64 -1 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) 1) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2)) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (sqrt.f64 2) 1) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (sqrt.f64 x-scale)))
(*.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 x-scale)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 x-scale) b)))
(/.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) (sqrt.f64 x-scale)) (sqrt.f64 x-scale))
(*.f64 (/.f64 (sqrt.f64 2) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (cbrt.f64 x-scale)))
(*.f64 (/.f64 (sqrt.f64 2) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (cbrt.f64 x-scale) b)))
(*.f64 (/.f64 1 x-scale) (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 1 x-scale) (*.f64 (/.f64 (sqrt.f64 2) (/.f64 1 b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (*.f64 1 (sqrt.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 b x-scale))) (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))))
(*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (/.f64 (sqrt.f64 2) (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2))) (/.f64 (sqrt.f64 2) (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))))
(/.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) b)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (sqrt.f64 2) (neg.f64 x-scale)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (*.f64 1 (/.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) x-scale)) (*.f64 (sqrt.f64 2) b))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 1 (neg.f64 x-scale)) (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (*.f64 -1 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (neg.f64 (sqrt.f64 2)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (pow.f64 2 1/4) 1) (*.f64 (/.f64 (pow.f64 2 1/4) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (pow.f64 2 1/4) (*.f64 (*.f64 (pow.f64 2 1/4) (/.f64 b x-scale)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (pow.f64 2 1/2) (/.f64 x-scale b)))
(*.f64 (/.f64 (pow.f64 2 1/4) x-scale) (*.f64 (/.f64 (pow.f64 2 1/4) (/.f64 1 b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (pow.f64 2 1/4) (*.f64 (*.f64 (pow.f64 2 1/4) (/.f64 b x-scale)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (pow.f64 2 1/2) (/.f64 x-scale b)))
(*.f64 (/.f64 (cbrt.f64 2) 1) (*.f64 (/.f64 (cbrt.f64 (sqrt.f64 2)) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (cbrt.f64 2) (*.f64 (*.f64 (cbrt.f64 (sqrt.f64 2)) (/.f64 b x-scale)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 b x-scale)) (*.f64 (cbrt.f64 2) (cbrt.f64 (sqrt.f64 2))))
(*.f64 (*.f64 (/.f64 (pow.f64 2 1/4) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (pow.f64 2 1/4))
(*.f64 (pow.f64 2 1/4) (*.f64 (*.f64 (pow.f64 2 1/4) (/.f64 b x-scale)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (pow.f64 2 1/2) (/.f64 x-scale b)))
(*.f64 (/.f64 (pow.f64 2 1/4) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (/.f64 (pow.f64 2 1/4) (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 (/.f64 (pow.f64 2 1/4) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2))) (/.f64 (pow.f64 2 1/4) (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))))
(/.f64 (/.f64 (pow.f64 2 1/2) (cbrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))
(*.f64 (/.f64 (cbrt.f64 2) x-scale) (*.f64 (/.f64 (cbrt.f64 (sqrt.f64 2)) (/.f64 1 b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 (*.f64 (/.f64 (cbrt.f64 2) x-scale) (*.f64 (/.f64 (cbrt.f64 (sqrt.f64 2)) 1) b)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))
(*.f64 (*.f64 b (cbrt.f64 (sqrt.f64 2))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (cbrt.f64 2) x-scale)))
(*.f64 (/.f64 (cbrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (/.f64 (cbrt.f64 (sqrt.f64 2)) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(/.f64 (*.f64 (/.f64 (cbrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))) (cbrt.f64 (sqrt.f64 2))) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(/.f64 (*.f64 (cbrt.f64 (sqrt.f64 2)) (/.f64 (cbrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (/.f64 (cbrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(/.f64 (*.f64 (cbrt.f64 2) (cbrt.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale))))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))
(/.f64 (*.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))) (cbrt.f64 2)) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale 1)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1)) b)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 b))) (sqrt.f64 b))
(/.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 b)) (/.f64 x-scale (*.f64 (sqrt.f64 b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 b) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 b))))
(*.f64 (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (*.f64 b b)))) (cbrt.f64 b))
(*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)) (cbrt.f64 (*.f64 b b))) (cbrt.f64 b))
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (cbrt.f64 (*.f64 b b)))) (cbrt.f64 b))
(*.f64 (/.f64 (sqrt.f64 2) -1) (neg.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (sqrt.f64 2) (neg.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (neg.f64 b))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (sqrt.f64 2) (neg.f64 (neg.f64 x-scale))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 1 (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (pow.f64 2 1/4))) (pow.f64 2 1/4))
(*.f64 (pow.f64 2 1/4) (*.f64 (*.f64 (pow.f64 2 1/4) (/.f64 b x-scale)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (pow.f64 2 1/2) (/.f64 x-scale b)))
(*.f64 (/.f64 1 (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 2))) (cbrt.f64 (sqrt.f64 2)))
(*.f64 (cbrt.f64 2) (*.f64 (*.f64 (cbrt.f64 (sqrt.f64 2)) (/.f64 b x-scale)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 b x-scale)) (*.f64 (cbrt.f64 2) (cbrt.f64 (sqrt.f64 2))))
(*.f64 (/.f64 (cbrt.f64 2) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) (cbrt.f64 (sqrt.f64 2)))
(*.f64 (cbrt.f64 2) (*.f64 (*.f64 (cbrt.f64 (sqrt.f64 2)) (/.f64 b x-scale)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 b x-scale)) (*.f64 (cbrt.f64 2) (cbrt.f64 (sqrt.f64 2))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) 1) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) 1) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) 1))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) b)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1 b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1 (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) x-scale) -1) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 2)) -1) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 2)) (neg.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) b)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 2)) (neg.f64 (neg.f64 x-scale))) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) 1) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) 1) (/.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (sqrt.f64 x-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (sqrt.f64 x-scale)))
(*.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 x-scale)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 x-scale) b)))
(/.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) (sqrt.f64 x-scale)) (sqrt.f64 x-scale))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b) (cbrt.f64 x-scale)))
(*.f64 (/.f64 (sqrt.f64 2) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (cbrt.f64 x-scale) b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) b)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (neg.f64 x-scale)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale 1)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 x-scale (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1)) b)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 b))) (sqrt.f64 b))
(/.f64 (*.f64 (sqrt.f64 2) (sqrt.f64 b)) (/.f64 x-scale (*.f64 (sqrt.f64 b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(*.f64 (sqrt.f64 b) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 b))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (*.f64 b b)))) (cbrt.f64 b))
(*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)) (cbrt.f64 (*.f64 b b))) (cbrt.f64 b))
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (cbrt.f64 (*.f64 b b)))) (cbrt.f64 b))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) -1) (neg.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (neg.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (neg.f64 b))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) 1) (neg.f64 (neg.f64 x-scale))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) 1) (sqrt.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (sqrt.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 b x-scale))) (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 x-scale)) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (sqrt.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))) (sqrt.f64 x-scale)))
(*.f64 (sqrt.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 x-scale)) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 (neg.f64 x-scale))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))))
(*.f64 (/.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 (neg.f64 x-scale)) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (neg.f64 b))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))) (sqrt.f64 (neg.f64 x-scale))) (sqrt.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (neg.f64 b))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (sqrt.f64 b))
(*.f64 (sqrt.f64 b) (/.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))))
(/.f64 (/.f64 (sqrt.f64 2) (sqrt.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))) (/.f64 (sqrt.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) (sqrt.f64 b)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) 1) (cbrt.f64 (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 b x-scale))))
(/.f64 (*.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 b x-scale))) (sqrt.f64 2)) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 x-scale)) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 (cbrt.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) (/.f64 (sqrt.f64 2) (*.f64 (cbrt.f64 x-scale) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))))
(*.f64 (cbrt.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) (/.f64 (sqrt.f64 2) (*.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2)) (cbrt.f64 x-scale))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (neg.f64 x-scale))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (neg.f64 b))))
(*.f64 (/.f64 (sqrt.f64 2) (*.f64 (cbrt.f64 (neg.f64 x-scale)) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (neg.f64 b))))
(*.f64 (/.f64 (sqrt.f64 2) (*.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2)) (cbrt.f64 (neg.f64 x-scale)))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (neg.f64 b))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 2) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2))) (cbrt.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))) (cbrt.f64 b))
(*.f64 (cbrt.f64 b) (/.f64 (sqrt.f64 2) (*.f64 (cbrt.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))))
(/.f64 (/.f64 (*.f64 (sqrt.f64 2) (cbrt.f64 b)) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2))) (cbrt.f64 (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))
(pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 1)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(pow.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 2)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 3)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(pow.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3) 1/3)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(pow.f64 (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2)) -1)
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(neg.f64 (*.f64 (/.f64 (sqrt.f64 2) (neg.f64 x-scale)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(sqrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))
(sqrt.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 2)) (*.f64 (/.f64 b x-scale) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(cbrt.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(cbrt.f64 (/.f64 (*.f64 2 (sqrt.f64 2)) (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3)))
(cbrt.f64 (/.f64 2 (/.f64 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 3) (sqrt.f64 2))))
(cbrt.f64 (*.f64 (/.f64 2 (pow.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))) 3)) (sqrt.f64 2)))
(expm1.f64 (log1p.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(exp.f64 (log.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))) 1))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(log1p.f64 (expm1.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))

localize198.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

NewAccuracyProgram
80.1%
(*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))
70.9%
(sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
57.8%
(cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))
57.4%
(sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))
Compiler

Compiled 452 to 261 computations (42.3% saved)

series22.0ms (0%)

Counts
4 → 132
Calls

33 calls:

TimeVariablePointExpression
3.0ms
angle
@0
(*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))
2.0ms
a
@0
(*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))
1.0ms
b
@0
(*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))
1.0ms
a
@inf
(*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))
1.0ms
x-scale
@0
(*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))

rewrite91.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
696×add-sqr-sqrt
682×*-un-lft-identity
678×pow1
638×add-exp-log
638×add-cbrt-cube
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
033278
1700278
Stop Event
node limit
Counts
4 → 54
Calls
Call 1
Inputs
(sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))
(sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))
Outputs
(((*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 1 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (sqrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (sqrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (cbrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (cbrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1/2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((sqrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((fabs.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log.f64 (exp.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((cbrt.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((expm1.f64 (log1p.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((exp.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log1p.f64 (expm1.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)))
(((*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 1 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (sqrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (sqrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (cbrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (cbrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1/2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((sqrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((fabs.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log.f64 (exp.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((cbrt.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)))
(((*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 1 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (sqrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (sqrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (sqrt.f64 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (sqrt.f64 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (cbrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (cbrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (cbrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (sqrt.f64 (cbrt.f64 (*.f64 4 (pow.f64 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) 2)))) (sqrt.f64 (cbrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (pow.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1/4) (pow.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1/4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((*.f64 (pow.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) 1/2) (pow.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((fabs.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log.f64 (exp.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((cbrt.f64 (*.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((expm1.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((exp.f64 (log.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log1p.f64 (expm1.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)))
(((pow.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log.f64 (exp.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((cbrt.f64 (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 8 (*.f64 y-scale y-scale)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((exp.f64 (log.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))) #f)))

simplify263.0ms (0.2%)

Algorithm
egg-herbie
Rules
1594×associate-*r*
1488×associate-/r/
870×*-commutative
868×associate-*l*
814×times-frac
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
051823478
1155323318
2699523318
Stop Event
node limit
Counts
186 → 263
Calls
Call 1
Inputs
(*.f64 1/180 (*.f64 angle (PI.f64)))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (*.f64 1/180 (*.f64 angle (PI.f64))))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (*.f64 1/180 (*.f64 angle (PI.f64))) (*.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (*.f64 1/180 (*.f64 angle (PI.f64))) (+.f64 (*.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (*.f64 -1/30855889612800000000 (*.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
1
(+.f64 1 (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 (*.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (+.f64 (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(/.f64 (*.f64 (sqrt.f64 2) b) x-scale)
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) b)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) b)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2))))) b)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) b)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2))))) b)) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) b) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 6) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2))))))) b)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 -1 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 6) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))))) (*.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))))
(+.f64 (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) b)) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) b)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (sqrt.f64 8)))))) b))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 6) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2)))) (sqrt.f64 8)))))) b)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) b)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (sqrt.f64 8)))))) b)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 6) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))))))
(*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 6) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1)
(*.f64 1 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(*.f64 (sqrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (sqrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(*.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (cbrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(*.f64 (cbrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1/2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1/2))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1)
(sqrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))
(fabs.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(log.f64 (exp.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(cbrt.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(expm1.f64 (log1p.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(exp.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(log1p.f64 (expm1.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1)
(*.f64 1 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (sqrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(*.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (cbrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1/2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1/2))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1)
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))
(fabs.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(log.f64 (exp.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(cbrt.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) 1)
(*.f64 1 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(*.f64 (sqrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (sqrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (sqrt.f64 2))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (cbrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(*.f64 (cbrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (cbrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (sqrt.f64 (cbrt.f64 (*.f64 4 (pow.f64 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) 2)))) (sqrt.f64 (cbrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (pow.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1/4) (pow.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1/4))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) 1/2) (pow.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) 1/2))
(pow.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1/2)
(pow.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) 1)
(fabs.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(log.f64 (exp.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(cbrt.f64 (*.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(expm1.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(exp.f64 (log.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(log1p.f64 (expm1.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(pow.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))) 1)
(log.f64 (exp.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(cbrt.f64 (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 8 (*.f64 y-scale y-scale))))))
(expm1.f64 (log1p.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(exp.f64 (log.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(log1p.f64 (expm1.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
Outputs
(*.f64 1/180 (*.f64 angle (PI.f64)))
(*.f64 angle (*.f64 1/180 (PI.f64)))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (*.f64 1/180 (*.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (*.f64 angle (*.f64 1/180 (PI.f64))))
(fma.f64 1/180 (*.f64 angle (PI.f64)) (*.f64 (pow.f64 angle 3) (*.f64 (pow.f64 (PI.f64) 3) -1/34992000)))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (*.f64 1/180 (*.f64 angle (PI.f64))) (*.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (*.f64 angle (PI.f64)) (*.f64 (*.f64 1/22674816000000 (pow.f64 angle 5)) (pow.f64 (PI.f64) 5))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (*.f64 angle (PI.f64)) (*.f64 (pow.f64 (PI.f64) 5) (*.f64 1/22674816000000 (pow.f64 angle 5)))))
(+.f64 (*.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (*.f64 1/180 (*.f64 angle (PI.f64))) (+.f64 (*.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (*.f64 -1/30855889612800000000 (*.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (*.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)) (*.f64 (*.f64 -1/30855889612800000000 (pow.f64 angle 7)) (pow.f64 (PI.f64) 7)))))
(fma.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (*.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (*.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)) (*.f64 (pow.f64 angle 7) (*.f64 (pow.f64 (PI.f64) 7) -1/30855889612800000000)))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
1
(+.f64 1 (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (*.f64 -1/64800 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2))))
(fma.f64 -1/64800 (*.f64 angle (*.f64 angle (pow.f64 (PI.f64) 2))) 1)
(+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 1 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 -1/64800 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2)))))
(+.f64 1 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 (pow.f64 (PI.f64) 2) (*.f64 -1/64800 (*.f64 angle angle)))))
(+.f64 (*.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (*.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (*.f64 -1/64800 (*.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(fma.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6)) (+.f64 1 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 -1/64800 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2))))))
(+.f64 (fma.f64 1/25194240000 (*.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (*.f64 (pow.f64 (PI.f64) 2) (*.f64 -1/64800 (*.f64 angle angle)))) (fma.f64 (*.f64 -1/24488801280000000 (pow.f64 angle 6)) (pow.f64 (PI.f64) 6) 1))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 x-scale b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 x-scale b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (fma.f64 1/16 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (*.f64 (*.f64 x-scale (pow.f64 b 5)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 x-scale b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))))))
(+.f64 (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)))) (/.f64 1/16 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5) (pow.f64 b 5))) (*.f64 (pow.f64 a 6) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6) (sqrt.f64 2))))))
(+.f64 (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))) (*.f64 (/.f64 (*.f64 1/16 (sqrt.f64 2)) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5) (pow.f64 b 5)))) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 b 4)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (*.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))))))
(+.f64 (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) (*.f64 (*.f64 -1/8 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (pow.f64 a 3)))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 b 4)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (*.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5)))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)))))))
(+.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (pow.f64 a 3)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (/.f64 1/16 (*.f64 x-scale (pow.f64 a 5))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6) (*.f64 (sqrt.f64 2) (pow.f64 b 6))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))))))
(*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale))
(neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))))
(neg.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)))
(*.f64 (neg.f64 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) -1/2))
(-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) -1/2) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 b 4)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (*.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) -1/2)))
(fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (pow.f64 a 3)))) 1/8 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) -1/2) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (+.f64 (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 b 4)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (*.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) (fma.f64 -1/16 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5)))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) -1/2))))
(fma.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (pow.f64 a 3)))) 1/8 (-.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) -1/2 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5) (*.f64 x-scale (pow.f64 a 5)))) (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6))) -1/16)) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))))
(/.f64 (*.f64 (sqrt.f64 2) b) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale b))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) b)
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) b)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))
(fma.f64 1/2 (/.f64 x-scale (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 angle angle)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (*.f64 (*.f64 angle angle) (sqrt.f64 2)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) b))
(fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 angle angle) (sqrt.f64 2)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) b))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) b)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2))))) b)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale)))
(fma.f64 1/2 (/.f64 x-scale (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 angle angle)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (fma.f64 1/2 (/.f64 x-scale (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 4)) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 b (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) 2))))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b))))
(fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (*.f64 (*.f64 angle angle) (sqrt.f64 2)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) x-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale b) (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))))) 2)) (*.f64 (pow.f64 angle 4) (sqrt.f64 2)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) b)))
(fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 angle angle) (sqrt.f64 2)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) x-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale b) (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) 2)) (*.f64 (pow.f64 angle 4) (sqrt.f64 2)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) b)))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) b)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2))))) b)) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) b) x-scale) (*.f64 1/2 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 6) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2))))))) b)))))
(fma.f64 1/2 (/.f64 x-scale (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 angle angle)) (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (+.f64 (fma.f64 1/2 (/.f64 x-scale (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 4)) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 b (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) 2))))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b))) (*.f64 1/2 (/.f64 x-scale (/.f64 b (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 6)) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (*.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 b b) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 b (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) 2))))))))))))))
(fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (*.f64 (*.f64 angle angle) (sqrt.f64 2)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) x-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale b) (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))))) 2)) (*.f64 (pow.f64 angle 4) (sqrt.f64 2)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (pow.f64 angle 6) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) x-scale)) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) x-scale) (/.f64 (*.f64 a a) x-scale))) (*.f64 -1/2 (*.f64 (*.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (*.f64 (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) x-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale b) (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))))) 2)))))) (sqrt.f64 2)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) b))))
(fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))) (*.f64 (*.f64 angle angle) (sqrt.f64 2)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) x-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale b) (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) 2)) (*.f64 (pow.f64 angle 4) (sqrt.f64 2)))) (fma.f64 1/2 (*.f64 (/.f64 x-scale b) (*.f64 (pow.f64 angle 6) (*.f64 (+.f64 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) x-scale)) (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) x-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale b) (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) 2))))) (sqrt.f64 2)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) b))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (neg.f64 (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (neg.f64 (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (neg.f64 (/.f64 (sqrt.f64 2) x-scale)))
(*.f64 -1 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (neg.f64 (/.f64 (sqrt.f64 2) x-scale)))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 b 4)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (*.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))))))
(+.f64 (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) (*.f64 (*.f64 -1/8 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (pow.f64 a 3)))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))) (fma.f64 -1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 b 4)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (*.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5)))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)))))))
(+.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (pow.f64 a 3)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b b)) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (/.f64 1/16 (*.f64 x-scale (pow.f64 a 5))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6) (*.f64 (sqrt.f64 2) (pow.f64 b 6))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))))))
(/.f64 (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)))
(*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))
(*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 x-scale b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 x-scale b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (fma.f64 1/16 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (*.f64 (*.f64 x-scale (pow.f64 b 5)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 x-scale b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))))))
(+.f64 (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)))) (/.f64 1/16 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5) (pow.f64 b 5))) (*.f64 (pow.f64 a 6) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6) (sqrt.f64 2))))))
(+.f64 (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))) (*.f64 (/.f64 (*.f64 1/16 (sqrt.f64 2)) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5) (pow.f64 b 5)))) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6))))
(*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale))
(neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b))) x-scale)
(*.f64 (neg.f64 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 x-scale b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) -1/2))
(fma.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) -1/2 (/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b))) x-scale))
(fma.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) -1/2 (*.f64 (neg.f64 (/.f64 (sqrt.f64 2) x-scale)) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 x-scale b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (*.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))))))
(-.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) -1/2 (/.f64 (*.f64 1/8 (sqrt.f64 2)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (*.f64 x-scale (pow.f64 b 3))) (pow.f64 a 4)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)))
(-.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) -1/2 (*.f64 (/.f64 1/8 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (*.f64 x-scale (pow.f64 b 3)))) (*.f64 (pow.f64 a 4) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (sqrt.f64 2))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))
(+.f64 (*.f64 -1 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 x-scale (*.f64 b (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))) (*.f64 x-scale (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))) (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))) (*.f64 x-scale (*.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5))))))))
(fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) (fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 x-scale b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))) (fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (*.f64 -1/16 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (*.f64 (*.f64 x-scale (pow.f64 b 5)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5)))))))
(-.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) -1/2 (fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (*.f64 -1/16 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (*.f64 x-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6) (pow.f64 b 5)))))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)))
(-.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 a a)) x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))) -1/2 (fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (*.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))) (*.f64 -1/16 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) (pow.f64 a 6)) (*.f64 x-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6) (pow.f64 b 5)))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)))
(*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)))
(*.f64 -1 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (neg.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
(*.f64 -1 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (neg.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
(*.f64 -1 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (neg.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
(*.f64 -1 (*.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (neg.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b)) (sqrt.f64 8)))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (*.f64 b (sqrt.f64 8))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b)) (sqrt.f64 8))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))
(fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (*.f64 b (sqrt.f64 8))) (fma.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)) (*.f64 -1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3))))))
(fma.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 b (*.f64 y-scale (sqrt.f64 8)))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) y-scale) (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))))))
(fma.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 b (*.f64 y-scale (sqrt.f64 8)))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (*.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (*.f64 (/.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (sqrt.f64 8))))))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 6) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))))) (*.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (*.f64 b (sqrt.f64 8))) (fma.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5)) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 a 6) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6))) (pow.f64 b 5))) (*.f64 -1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))))))
(fma.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 b (*.f64 y-scale (sqrt.f64 8)))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (fma.f64 -1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) y-scale) (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (*.f64 (*.f64 1/16 (/.f64 (sqrt.f64 2) (pow.f64 b 5))) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a 6) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))))))
(fma.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 b (*.f64 y-scale (sqrt.f64 8)))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (*.f64 (/.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (sqrt.f64 8))))) (*.f64 (*.f64 1/16 (/.f64 (sqrt.f64 2) (pow.f64 b 5))) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a 6) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))))
(fma.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (*.f64 (*.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (sqrt.f64 8)))))) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (*.f64 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) y-scale)) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (*.f64 (*.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (*.f64 (*.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (*.f64 (pow.f64 b 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (sqrt.f64 8)))))) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (*.f64 (*.f64 (pow.f64 b 6) (sqrt.f64 8)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6) y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (*.f64 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) y-scale)) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (*.f64 (*.f64 (pow.f64 b 6) (sqrt.f64 8)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6) y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))))))
(*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(neg.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8)))))
(*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 y-scale))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (neg.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))))))
(-.f64 (*.f64 -1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8)))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))))
(fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (*.f64 (*.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (neg.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8)))))))
(-.f64 (fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (sqrt.f64 8)))))) (*.f64 -1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8)))))
(-.f64 (fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (*.f64 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) y-scale)) (*.f64 -1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8)))))
(+.f64 (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))))
(fma.f64 -1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (*.f64 (*.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (*.f64 (pow.f64 b 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))) (fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (*.f64 (*.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)) (neg.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))))))))
(fma.f64 -1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (*.f64 (*.f64 (pow.f64 b 6) (sqrt.f64 8)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6) y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))) (-.f64 (fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (sqrt.f64 8)))))) (*.f64 -1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))))))
(fma.f64 -1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (*.f64 (*.f64 (pow.f64 b 6) (sqrt.f64 8)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6) y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))) (-.f64 (fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (*.f64 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) y-scale)) (*.f64 -1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)))
(*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)) b)
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) b)) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(fma.f64 1/2 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 angle angle)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (sqrt.f64 8)))) b) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) b) (*.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 angle (*.f64 angle (sqrt.f64 8)))) (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))))) (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)) b))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) b) (*.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 angle (*.f64 angle (sqrt.f64 8)))) (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)) b))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) b)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (sqrt.f64 8)))))) b))))
(fma.f64 1/2 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 angle angle)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (sqrt.f64 8)))) b) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)) (/.f64 (*.f64 1/2 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 4)) (*.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 b (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) 2)) (sqrt.f64 8))))) b)))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) b) (*.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 angle (*.f64 angle (sqrt.f64 8)))) (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))))) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 8))) (/.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 angle 4) (*.f64 (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) x-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale b) (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))))) 2)) (sqrt.f64 8)) (sqrt.f64 2))) (*.f64 x-scale x-scale)))) b)))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) b) (*.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 angle (*.f64 angle (sqrt.f64 8)))) (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 8))) (*.f64 (/.f64 1/2 b) (*.f64 y-scale (*.f64 (*.f64 (pow.f64 angle 4) (*.f64 (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) x-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale b) (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) 2)) (sqrt.f64 8)) (sqrt.f64 2))) (*.f64 x-scale x-scale))))))
(+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 6) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (+.f64 (*.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (*.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (+.f64 (*.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (*.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2)))) (sqrt.f64 8)))))) b)) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 2) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))))) b)) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 1/2 (/.f64 (*.f64 (pow.f64 x-scale 2) (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 angle 4) (*.f64 (-.f64 (+.f64 (*.f64 -1/3149280000 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (*.f64 (+.f64 (*.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (*.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (pow.f64 (*.f64 1/2 (/.f64 (*.f64 x-scale (+.f64 (*.f64 -1/32400 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (*.f64 1/32400 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) b)) 2)) (sqrt.f64 8)))))) b)))))
(fma.f64 1/2 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 6)) (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (*.f64 1/2 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 b b) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 b (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) 2)))))))) (sqrt.f64 8)))) b) (fma.f64 1/2 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (*.f64 (sqrt.f64 2) (*.f64 angle angle)) (*.f64 (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (sqrt.f64 8)))) b) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale b) (sqrt.f64 8)) (/.f64 (*.f64 1/2 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (*.f64 (sqrt.f64 2) (pow.f64 angle 4)) (*.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (pow.f64 (*.f64 1/2 (/.f64 x-scale (/.f64 b (fma.f64 -1/32400 (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (*.f64 1/32400 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) 2)) (sqrt.f64 8))))) b))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) b) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (pow.f64 angle 6) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) x-scale)) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) x-scale) (/.f64 (*.f64 a a) x-scale))) (*.f64 -1/2 (*.f64 (*.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (*.f64 (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))) (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) x-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale b) (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))))) 2)))))) (sqrt.f64 8))) y-scale))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) b) (*.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 angle (*.f64 angle (sqrt.f64 8)))) (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))))) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 8))) (/.f64 (*.f64 1/2 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 angle 4) (*.f64 (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) x-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale b) (fma.f64 -1/32400 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (pow.f64 (PI.f64) 2) x-scale)) (*.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)))))) 2)) (sqrt.f64 8)) (sqrt.f64 2))) (*.f64 x-scale x-scale)))) b))))
(fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) b) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (pow.f64 angle 6) (*.f64 (+.f64 (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) x-scale)) (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (*.f64 1/2 (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) x-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale b) (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) 2))))) (sqrt.f64 8))) y-scale))) (fma.f64 1/2 (*.f64 (/.f64 (*.f64 x-scale x-scale) b) (*.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 angle (*.f64 angle (sqrt.f64 8)))) (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) (fma.f64 (sqrt.f64 2) (*.f64 b (*.f64 y-scale (sqrt.f64 8))) (*.f64 (/.f64 1/2 b) (*.f64 y-scale (*.f64 (*.f64 (pow.f64 angle 4) (*.f64 (*.f64 (-.f64 (fma.f64 -1/3149280000 (*.f64 (/.f64 (pow.f64 (PI.f64) 4) x-scale) (/.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 b (/.f64 b x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) 4) 1/3149280000) x-scale))) (pow.f64 (*.f64 1/2 (*.f64 (/.f64 x-scale b) (fma.f64 1/32400 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2)) (*.f64 (/.f64 (*.f64 (*.f64 b b) -1/32400) (*.f64 x-scale x-scale)) (pow.f64 (PI.f64) 2))))) 2)) (sqrt.f64 8)) (sqrt.f64 2))) (*.f64 x-scale x-scale)))))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))))
(*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))))
(fma.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (*.f64 (*.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a)))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (sqrt.f64 8)))))) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (*.f64 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) y-scale)) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))))))))
(+.f64 (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4) (*.f64 (pow.f64 b 4) (sqrt.f64 8))))) (*.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6) (*.f64 (pow.f64 b 6) (sqrt.f64 8))))) (*.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5)))) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 b 2) (sqrt.f64 8))))) (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 (*.f64 (*.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4)) (*.f64 (pow.f64 b 4) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (*.f64 (*.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (*.f64 (pow.f64 b 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 b b) (sqrt.f64 8)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (sqrt.f64 8)))))) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (*.f64 (*.f64 (pow.f64 b 6) (sqrt.f64 8)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6) y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))))))
(fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 3)) (*.f64 (/.f64 (*.f64 (pow.f64 b 4) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (sqrt.f64 8))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) y-scale)) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (*.f64 (*.f64 (pow.f64 b 6) (sqrt.f64 8)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6) y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))) (fma.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 8)) y-scale)) (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))))))
(*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8)))))
(*.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (*.f64 b (sqrt.f64 8))))
(*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b)) (sqrt.f64 8)))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (*.f64 b (sqrt.f64 8))) (*.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b))))
(fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b)) (sqrt.f64 8))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))))
(fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (*.f64 b (sqrt.f64 8))) (fma.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)) (*.f64 -1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3))))))
(fma.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 b (*.f64 y-scale (sqrt.f64 8)))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) y-scale) (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))))))
(fma.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 b (*.f64 y-scale (sqrt.f64 8)))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (*.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (*.f64 (/.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (sqrt.f64 8))))))))
(+.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (+.f64 (*.f64 1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 6) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))))))
(fma.f64 (sqrt.f64 2) (*.f64 (*.f64 y-scale (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (*.f64 b (sqrt.f64 8))) (fma.f64 1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)) (fma.f64 1/16 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5)) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (pow.f64 a 6) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6))) (pow.f64 b 5))) (*.f64 -1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3)))))))
(fma.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 b (*.f64 y-scale (sqrt.f64 8)))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (fma.f64 -1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) y-scale) (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (*.f64 (*.f64 1/16 (/.f64 (sqrt.f64 2) (pow.f64 b 5))) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a 6) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))))))
(fma.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 b (*.f64 y-scale (sqrt.f64 8)))) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (fma.f64 -1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (*.f64 (/.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (sqrt.f64 8))))) (*.f64 (*.f64 1/16 (/.f64 (sqrt.f64 2) (pow.f64 b 5))) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a 6) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5))))))
(*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(neg.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 b (sqrt.f64 8))))))
(*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b)) (sqrt.f64 8)) (neg.f64 y-scale))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)) (neg.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 b (sqrt.f64 8)))))))
(-.f64 (*.f64 -1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b))) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b)) (sqrt.f64 8))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))))
(fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)) (fma.f64 1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3))) (neg.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 b (sqrt.f64 8))))))))
(fma.f64 -1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (fma.f64 1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) y-scale) (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b)) (sqrt.f64 8)) (neg.f64 y-scale))))
(fma.f64 -1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (*.f64 (/.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (sqrt.f64 8))))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b)) (sqrt.f64 8)) (neg.f64 y-scale))))
(+.f64 (*.f64 -1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b))) (+.f64 (*.f64 1/8 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 4) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 4))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (*.f64 -1/16 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (pow.f64 a 6) (*.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 6))))) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))))))
(fma.f64 -1/2 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) b)) (fma.f64 1/8 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3) (pow.f64 b 3))) (fma.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 b (sqrt.f64 8))))) (/.f64 (*.f64 -1/16 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 (pow.f64 a 6) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5) (pow.f64 b 5))))))
(fma.f64 -1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (fma.f64 1/8 (*.f64 (/.f64 (*.f64 (sqrt.f64 2) y-scale) (pow.f64 b 3)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (sqrt.f64 8))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3))) (-.f64 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 5)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a 6) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5)) -1/16)) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b)) (sqrt.f64 8))))))
(fma.f64 -1/2 (*.f64 (/.f64 (sqrt.f64 2) (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) b)) (fma.f64 1/8 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (*.f64 (/.f64 y-scale (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 3)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4) (*.f64 (pow.f64 a 4) (sqrt.f64 8))))) (-.f64 (*.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 5)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a 6) y-scale) (sqrt.f64 8)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 6)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 5)) -1/16)) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b)) (sqrt.f64 8))))))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 x-scale (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 2) (sqrt.f64 8))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 (sqrt.f64 2) (*.f64 (*.f64 x-scale (sqrt.f64 8)) y-scale)))
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1)
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(*.f64 1 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(*.f64 (sqrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (sqrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(*.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (cbrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(*.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (cbrt.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))
(*.f64 (cbrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(*.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (cbrt.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1/2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1/2))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1)
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(sqrt.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(fabs.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(log.f64 (exp.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(cbrt.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(expm1.f64 (log1p.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(exp.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(log1p.f64 (expm1.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1)
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(*.f64 1 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (sqrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(*.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (cbrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(*.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (cbrt.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))
(*.f64 (cbrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))) (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(*.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (cbrt.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))))
(*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1/2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1/2))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 1)
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(fabs.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(log.f64 (exp.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(cbrt.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))
(cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64))))
(*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) 1)
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 1 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (sqrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (sqrt.f64 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (sqrt.f64 2))
(*.f64 (sqrt.f64 2) (sqrt.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (cbrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (cbrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(*.f64 (cbrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (cbrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (cbrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(*.f64 (sqrt.f64 (cbrt.f64 (*.f64 4 (pow.f64 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) 2)))) (sqrt.f64 (cbrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (sqrt.f64 (cbrt.f64 (*.f64 4 (pow.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) 2)))) (sqrt.f64 (cbrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (pow.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1/4) (pow.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1/4))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) 1/2) (pow.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) 1/2))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(pow.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1/2)
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(pow.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) 1)
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(fabs.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(log.f64 (exp.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(cbrt.f64 (*.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(cbrt.f64 (*.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(cbrt.f64 (pow.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 3/2))
(expm1.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(exp.f64 (log.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(log1p.f64 (expm1.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(pow.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))) 1)
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) x-scale))
(log.f64 (exp.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) x-scale))
(cbrt.f64 (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (*.f64 8 (*.f64 y-scale y-scale))))))
(cbrt.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 2 (*.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (*.f64 8 (*.f64 y-scale y-scale))))))))
(cbrt.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) x-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) 16)))))
(expm1.f64 (log1p.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) x-scale))
(exp.f64 (log.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) x-scale))
(log1p.f64 (expm1.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (/.f64 (*.f64 a (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) x-scale))

eval877.0ms (0.6%)

Compiler

Compiled 38237 to 27878 computations (27.1% saved)

prune734.0ms (0.5%)

Pruning

154 alts after pruning (151 fresh and 3 done)

PrunedKeptTotal
New90839947
Fresh25112137
Picked101
Done235
Total9361541090
Accurracy
63.5%
Counts
1090 → 154
Alt Table
Click to see full alt table
StatusAccuracyProgram
2.1%
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) 1/2) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (pow.f64 x-scale 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) 2))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))
3.3%
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2)))))))))
9.8%
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3) 1/3)
9.8%
(pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3)
18.0%
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
18.5%
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
18.4%
(pow.f64 (cbrt.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 3)
2.6%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale))))
2.2%
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))
5.1%
(*.f64 (/.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 y-scale (*.f64 x-scale x-scale))) (pow.f64 (*.f64 x-scale y-scale) 2))
1.3%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (*.f64 1 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
1.2%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) 1) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
1.2%
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
4.1%
(*.f64 (*.f64 (*.f64 -1/4 (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
1.3%
(*.f64 (*.f64 (*.f64 -1/4 (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
6.5%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
4.9%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
4.8%
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
15.9%
(*.f64 (*.f64 1/4 (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))
6.6%
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
2.4%
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))
11.8%
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))
11.8%
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
15.9%
(*.f64 (*.f64 1/4 (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))
18.6%
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
11.5%
(*.f64 (*.f64 1/4 y-scale) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1))
18.5%
(*.f64 (*.f64 1/4 y-scale) (/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
11.7%
(*.f64 (*.f64 1/4 y-scale) (-.f64 (/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) 1))
9.2%
(*.f64 (*.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 b b)))))) 1))
11.1%
(*.f64 (*.f64 1/4 y-scale) (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 8))) (sqrt.f64 2)))
7.1%
(*.f64 (*.f64 1/4 y-scale) (*.f64 (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) b))) (sqrt.f64 2)))
4.1%
(*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
1.2%
(*.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
3.2%
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))
4.2%
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
0.9%
(*.f64 (exp.f64 (log.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (pow.f64 (*.f64 x-scale y-scale) 2))
18.7%
(*.f64 y-scale b)
13.9%
(*.f64 b (neg.f64 y-scale))
13.2%
(*.f64 1/4 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 1))
13.3%
(*.f64 1/4 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) x-scale) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
13.4%
(*.f64 1/4 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 2)) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
8.5%
(*.f64 1/4 (*.f64 (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))) (neg.f64 (sqrt.f64 2))))
12.8%
(*.f64 1/4 (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (neg.f64 (sqrt.f64 2))))
4.9%
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))
8.7%
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))
18.4%
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
6.2%
(*.f64 1/4 (*.f64 y-scale (pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)))
11.1%
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2)))
18.5%
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b 4)) 3)))
7.1%
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3) (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3))))
18.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (cbrt.f64 (*.f64 b 4)))))
6.0%
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 b 1/4) (sqrt.f64 (*.f64 (sqrt.f64 b) (*.f64 b 16))))))
8.7%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))
11.6%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (sqrt.f64 2) y-scale))))
11.0%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
8.7%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
3.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
3.4%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))))))))
5.4%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))))))))
3.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (log1p.f64 (expm1.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
3.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (expm1.f64 (log1p.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
2.6%
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
6.8%
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (/.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))))))
5.2%
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b (*.f64 b 16))))) (pow.f64 (*.f64 b 4) 1/6))))
11.2%
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)))
17.3%
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 16 (pow.f64 (cbrt.f64 b) 4))) (cbrt.f64 b))))
18.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))))
8.7%
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
8.7%
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
14.7%
(*.f64 1/4 (*.f64 y-scale (*.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) (cbrt.f64 (*.f64 b 4)))))
18.5%
(*.f64 1/4 (*.f64 y-scale (*.f64 b (pow.f64 (cbrt.f64 4) 3))))
11.0%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 6))))
11.1%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16)))))))
9.3%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3) 1))))
9.0%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
9.3%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 1) 1))))
7.2%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1) (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1)) 1))))
8.9%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/3)) 1))))
8.9%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (-.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) 1)) 1))))
2.8%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))))
8.9%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (*.f64 (pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/6) (pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/6))) 1))))
8.9%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (expm1.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) 1))))
9.0%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (exp.f64 (log.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) 1))))
10.9%
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (expm1.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
11.8%
(*.f64 1/4 (*.f64 y-scale (expm1.f64 (log1p.f64 (*.f64 b 4)))))
7.2%
(*.f64 1/4 (*.f64 y-scale (exp.f64 (log.f64 (*.f64 b 4)))))
11.1%
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (pow.f64 (*.f64 b 4) 3))))
13.9%
(*.f64 1/4 (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (neg.f64 (sqrt.f64 2))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))))
13.9%
(*.f64 1/4 (*.f64 x-scale (/.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2)))))
13.8%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))))
13.6%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3) b))))))
11.8%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (*.f64 b b)))) (cbrt.f64 b)))))
13.8%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))))
13.7%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (pow.f64 2 1/4) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (pow.f64 2 1/4)))))
6.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (neg.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale)))))
6.3%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (expm1.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))))))
7.2%
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (exp.f64 (log.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
13.0%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 3/2) 1/3))))
17.0%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/4) 2))))
16.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (pow.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) 3))))
14.1%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
9.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) b) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
17.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
22.1%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))))
10.3%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
10.0%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
14.0%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
14.3%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a))))
10.1%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b)))))
13.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
9.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
17.8%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
15.9%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 4))) (fabs.f64 (cbrt.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))))
9.6%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2))))))
13.5%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
11.6%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (sqrt.f64 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 4)))))))
16.2%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (exp.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))))))
17.8%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
9.7%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
16.2%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (exp.f64 (*.f64 (log.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1/2)))))
13.6%
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (cbrt.f64 (pow.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)) 3/2)))))
8.5%
(*.f64 1/4 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
13.3%
(*.f64 1/4 (sqrt.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 2)))
8.5%
(*.f64 1/4 (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
14.4%
(*.f64 1/4 (neg.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
12.8%
(*.f64 1/4 (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))))))
22.0%
(*.f64 1/4 (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))))
8.3%
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 y-scale)))))
12.1%
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b)) (sqrt.f64 8)) (neg.f64 y-scale)))))
17.8%
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)) b))))
9.8%
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) x-scale)))))
8.5%
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8)))))))
17.7%
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))))))
8.5%
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
12.3%
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))))
8.3%
(*.f64 1/4 (expm1.f64 (log1p.f64 (neg.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))))))))
3.4%
(*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
17.9%
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
17.9%
(sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 8))) 2) 1/8))
11.6%
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
5.6%
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
9.0%
(fabs.f64 (*.f64 (sqrt.f64 8) (/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale))))) 3)) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale))))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))))))))))
27.9%
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
27.9%
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b)))))
11.3%
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (exp.f64 (log.f64 (*.f64 b (sqrt.f64 2)))) (*.f64 1/4 y-scale))))
5.6%
(fabs.f64 (*.f64 (sqrt.f64 8) (log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))))))
18.9%
(fabs.f64 (*.f64 (sqrt.f64 8) (expm1.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))))
27.7%
(fabs.f64 (*.f64 (sqrt.f64 2) (pow.f64 (cbrt.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 3)))
27.9%
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))
27.5%
(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
1.1%
(expm1.f64 (log1p.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
17.8%
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
17.1%
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
10.3%
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
Compiler

Compiled 8379 to 5928 computations (29.3% saved)

regimes5.5s (4%)

Counts
249 → 2
Calls
Call 1
Inputs
(*.f64 y-scale b)
(*.f64 b (neg.f64 y-scale))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 1) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16)))))))
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (exp.f64 (log.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (expm1.f64 (log1p.f64 (*.f64 b 4)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (*.f64 (pow.f64 b 3) 64))))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (pow.f64 (*.f64 b 4) 3))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (pow.f64 (cbrt.f64 4) 3))))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b 4)) 3)))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
(*.f64 1/4 (*.f64 y-scale (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3)
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 8))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) (cbrt.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (sqrt.f64 2) y-scale))))
(*.f64 (*.f64 1/4 y-scale) (/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) 1))
(*.f64 1/4 (*.f64 y-scale (log.f64 (pow.f64 (exp.f64 b) 4))))
(sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 8))) 2) 1/8))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 6))))
(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b)))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (expm1.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (fabs.f64 (*.f64 (sqrt.f64 8) b)) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 y-scale) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1))
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (*.f64 (*.f64 1/4 y-scale) b) (sqrt.f64 8)) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 b 1/4) (sqrt.f64 (*.f64 (sqrt.f64 b) (*.f64 b 16))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (cbrt.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3) 1))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b (*.f64 b 16))))) (pow.f64 (*.f64 b 4) 1/6))))
(*.f64 (/.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 y-scale (*.f64 x-scale x-scale))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (/.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1) (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1)) 1))))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)) b))))
(*.f64 (*.f64 1/4 y-scale) (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) b))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 16 (pow.f64 (cbrt.f64 b) 4))) (cbrt.f64 b))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) b)) 3) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 3))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 2))
(pow.f64 (cbrt.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 3)
(pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) y-scale))) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3))
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3) 1/3)
(*.f64 (*.f64 1/4 y-scale) (cbrt.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3) (*.f64 2 (sqrt.f64 2)))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (cbrt.f64 (*.f64 (pow.f64 b 3) (*.f64 8 (sqrt.f64 8)))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 b b)))))) 1))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))))))
(*.f64 1/4 (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) b) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3) (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3))))
(*.f64 1/4 (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (neg.f64 (sqrt.f64 2))))
(*.f64 1/4 (*.f64 (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))) (neg.f64 (sqrt.f64 2))))
(*.f64 1/4 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))))
(*.f64 1/4 (*.f64 x-scale (/.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))
(*.f64 1/4 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 2)) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 1/4 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) x-scale) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (neg.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale)))))
(*.f64 1/4 (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (neg.f64 (sqrt.f64 2))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))))
(fabs.f64 (*.f64 (sqrt.f64 8) (expm1.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (exp.f64 (log.f64 (*.f64 b (sqrt.f64 2)))) (*.f64 1/4 y-scale))))
(fabs.f64 (*.f64 (sqrt.f64 2) (pow.f64 (cbrt.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 3)))
(fabs.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))) 3))
(fabs.f64 (*.f64 (sqrt.f64 8) (log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (exp.f64 (log.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (expm1.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) 1))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (-.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) 1)) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/3)) 1))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2))))))
(*.f64 1/4 (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))))
(*.f64 1/4 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 1))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (pow.f64 2 1/4) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (pow.f64 2 1/4)))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8)))))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (neg.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))))))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b)) (sqrt.f64 8)) (neg.f64 y-scale)))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 y-scale)))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (exp.f64 (log.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(*.f64 1/4 (sqrt.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3) b))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (*.f64 b b)))) (cbrt.f64 b)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 (sqrt.f64 2) a (/.f64 (*.f64 (*.f64 1/2 (*.f64 (*.f64 angle angle) (sqrt.f64 2))) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 b b) 1/32400) (*.f64 (*.f64 a a) -1/32400)))) a)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 1 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 b y-scale)))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 b y-scale))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b y-scale))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (*.f64 (pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/6) (pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/6))) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 b (*.f64 b 16))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b (*.f64 b 16))))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))))))))
(*.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))))
(*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))))
(*.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)) (*.f64 y-scale y-scale))))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (pow.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) 1/2))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (sqrt.f64 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 4)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (cbrt.f64 (pow.f64 (*.f64 2 (pow.f64 (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) 2)) 3/2)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (exp.f64 (*.f64 (log.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) 1/2)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 1/4) 2))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (pow.f64 (pow.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))) 3/2) 1/3))))
(*.f64 (*.f64 1/4 (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (pow.f64 (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)) 2))) (cbrt.f64 (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))))
(*.f64 (*.f64 1/4 (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 (*.f64 2 (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (fma.f64 2 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (neg.f64 (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (/.f64 (/.f64 (sqrt.f64 8) y-scale) x-scale)))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) (sqrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) 1))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (exp.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (pow.f64 (cbrt.f64 (sqrt.f64 (*.f64 2 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) a) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) 2))))) 3))))
(*.f64 1/4 (neg.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) b) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))) -1/2) (*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b))))))
(*.f64 (*.f64 1/4 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))) (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 (*.f64 (*.f64 1/4 (/.f64 (sqrt.f64 8) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 x-scale (*.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (sqrt.f64 8)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (expm1.f64 (log1p.f64 (sqrt.f64 (*.f64 2 (+.f64 (*.f64 a (*.f64 a (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 (/.f64 (*.f64 1/2 (sqrt.f64 2)) b) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) b) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (*.f64 1/2 (/.f64 (*.f64 (sqrt.f64 2) (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 (*.f64 2 (fma.f64 a (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) x-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 (*.f64 y-scale (sqrt.f64 8)) x-scale)))))
(/.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (fma.f64 1/2 (*.f64 (/.f64 (sqrt.f64 2) x-scale) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) b)) (*.f64 a a))) (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))))))))
(fabs.f64 (*.f64 (sqrt.f64 8) (/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale))))) 3)) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale))))) (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))
(/.f64 (expm1.f64 (*.f64 (log1p.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)))))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (cbrt.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1)) 3) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))) 1) 3) 1/3) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (*.f64 2 (/.f64 (*.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 -1/4 (*.f64 (*.f64 (sqrt.f64 2) b) (sqrt.f64 8)))) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 3) -1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (exp.f64 (*.f64 2 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))))))))
(*.f64 (*.f64 1/4 (*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale (*.f64 x-scale x-scale))))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (fma.f64 (*.f64 b b) (pow.f64 (*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) 4))) (fabs.f64 (cbrt.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 a a))))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) 3)) (+.f64 (exp.f64 (log1p.f64 (*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale)))) (+.f64 1 (pow.f64 (pow.f64 (exp.f64 2) (pow.f64 (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2))))) 2)) (cbrt.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b y-scale) (sqrt.f64 1/2)))))))))
(*.f64 (*.f64 (*.f64 -1/4 (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 1 (*.f64 y-scale y-scale))) 2))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) 2) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))))
(*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(*.f64 (*.f64 -1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(*.f64 (*.f64 1/4 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 8) a)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 x-scale (*.f64 (sqrt.f64 8) b)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale b) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))
(*.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale x-scale) (*.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (*.f64 4 (*.f64 (/.f64 (pow.f64 a 4) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))))
(*.f64 (*.f64 1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a y-scale) (/.f64 (sqrt.f64 8) x-scale)))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale))))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (*.f64 (/.f64 a x-scale) (/.f64 (sqrt.f64 8) y-scale)))))
(*.f64 (*.f64 (*.f64 -1/4 (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (*.f64 (*.f64 1/4 (/.f64 b (/.f64 (*.f64 y-scale x-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (expm1.f64 (log1p.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (log1p.f64 (expm1.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))
(*.f64 1/4 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 4 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) 1) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (*.f64 1 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a 1) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(expm1.f64 (log1p.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) y-scale) (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 b (neg.f64 a))) (/.f64 (*.f64 8 (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 2 (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (*.f64 b (*.f64 (neg.f64 a) (*.f64 b a))))))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b 1) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2))
(expm1.f64 (log1p.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (/.f64 (neg.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b))))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))))))))))) (*.f64 a (*.f64 b (*.f64 b (*.f64 a -4))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (/.f64 4 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))))) (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (pow.f64 (*.f64 x-scale y-scale) 2))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 (exp.f64 (log.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 2 (*.f64 (*.f64 (/.f64 4 (/.f64 (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (*.f64 b a)) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) 2)) (*.f64 y-scale y-scale))) 2) (pow.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) x-scale) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a)))) y-scale)) 2))))))) (*.f64 4 (*.f64 b (*.f64 a (*.f64 b (neg.f64 a)))))))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 (/.f64 (sqrt.f64 (*.f64 b (*.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 -8 (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (*.f64 (*.f64 (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))) (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180)))) (cbrt.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) 180))))) 2)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) (/.f64 y-scale (*.f64 2 (*.f64 (+.f64 b a) (-.f64 b a))))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
(fma.f64 -1/4 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))) (*.f64 -1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (sqrt.f64 8)) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))))
(fma.f64 -1/8 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) x-scale) (*.f64 (*.f64 -1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))
(fma.f64 1/8 (*.f64 (/.f64 x-scale (/.f64 y-scale (*.f64 (sqrt.f64 8) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 1/2 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(fma.f64 1/8 (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))) (*.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))) (sqrt.f64 8)) y-scale) (sqrt.f64 (/.f64 1 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))) (*.f64 (*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))))))))
(fma.f64 -1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) a)) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 a (*.f64 (*.f64 y-scale (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 -8 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))) (sqrt.f64 8))))))
(fma.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) b)) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) (*.f64 1/8 (*.f64 (/.f64 y-scale (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -4)))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))) (sqrt.f64 (/.f64 1 (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))))))
(cbrt.f64 (*.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4))))) (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))) (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (*.f64 (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)) (/.f64 (sqrt.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a (*.f64 8 (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (pow.f64 (*.f64 y-scale x-scale) 2) (*.f64 a b)))) (+.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) y-scale) (*.f64 2 (*.f64 (-.f64 b a) (+.f64 a b)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (*.f64 a (*.f64 (*.f64 b b) (*.f64 a -4)))))))))
(fma.f64 -1/2 (*.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))) (fma.f64 -1/4 (*.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 -1/8 (/.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 8) (-.f64 (fma.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (*.f64 (-.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) 2) (*.f64 -8 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))) (pow.f64 (*.f64 -4 (*.f64 (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) 2))) (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) (pow.f64 (*.f64 -2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) (*.f64 (/.f64 (*.f64 0 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)))) 2)))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (pow.f64 x-scale 4) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (*.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) 1/2) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (pow.f64 x-scale 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (/.f64 (*.f64 4 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (*.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))) 2))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))
(fma.f64 1/8 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))) (fma.f64 1/8 (*.f64 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) (*.f64 (*.f64 y-scale (pow.f64 x-scale 4)) (*.f64 (sqrt.f64 8) (-.f64 (*.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2))))) (fma.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (*.f64 (*.f64 1/8 (*.f64 (*.f64 y-scale (pow.f64 x-scale 6)) (*.f64 (sqrt.f64 8) (+.f64 (*.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2)) (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2))))))))) (*.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 -2 (*.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 4 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2)))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (*.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) 2))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (*.f64 (*.f64 -2 (+.f64 (/.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (*.f64 a a) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))) 2))))))))) (sqrt.f64 (/.f64 1 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))))
Outputs
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))))
Calls

8 calls:

1.2s
angle
695.0ms
y-scale
662.0ms
(/.f64 angle 180)
592.0ms
(*.f64 (/.f64 angle 180) (PI.f64))
527.0ms
a
Results
AccuracySegmentsBranch
32.2%3a
32.3%3b
32.5%4angle
37.8%2x-scale
35.3%3y-scale
27.9%1(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 2 (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))))) (/.f64 (*.f64 4 (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) 2)))
32.5%4(*.f64 (/.f64 angle 180) (PI.f64))
32.5%4(/.f64 angle 180)
Compiler

Compiled 16226 to 10278 computations (36.7% saved)

bsearch365.0ms (0.3%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
354.0ms
2.4395022602544392e-12
7.185682143642715e-8
Results
204.0ms37×body1024valid
96.0ms77×body256valid
45.0ms14×body512valid
Compiler

Compiled 604 to 475 computations (21.4% saved)

regimes1.3s (1%)

Counts
141 → 5
Calls
Call 1
Inputs
(*.f64 y-scale b)
(*.f64 b (neg.f64 y-scale))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 1) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16)))))))
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (exp.f64 (log.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (expm1.f64 (log1p.f64 (*.f64 b 4)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (*.f64 (pow.f64 b 3) 64))))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (pow.f64 (*.f64 b 4) 3))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (pow.f64 (cbrt.f64 4) 3))))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b 4)) 3)))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
(*.f64 1/4 (*.f64 y-scale (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3)
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 8))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) (cbrt.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (sqrt.f64 2) y-scale))))
(*.f64 (*.f64 1/4 y-scale) (/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) 1))
(*.f64 1/4 (*.f64 y-scale (log.f64 (pow.f64 (exp.f64 b) 4))))
(sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 8))) 2) 1/8))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 6))))
(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b)))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (expm1.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (fabs.f64 (*.f64 (sqrt.f64 8) b)) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 y-scale) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1))
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (*.f64 (*.f64 1/4 y-scale) b) (sqrt.f64 8)) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 b 1/4) (sqrt.f64 (*.f64 (sqrt.f64 b) (*.f64 b 16))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (cbrt.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3) 1))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b (*.f64 b 16))))) (pow.f64 (*.f64 b 4) 1/6))))
(*.f64 (/.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 y-scale (*.f64 x-scale x-scale))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (/.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1) (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1)) 1))))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)) b))))
(*.f64 (*.f64 1/4 y-scale) (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) b))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 16 (pow.f64 (cbrt.f64 b) 4))) (cbrt.f64 b))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) b)) 3) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 3))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 2))
(pow.f64 (cbrt.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 3)
(pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) y-scale))) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3))
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3) 1/3)
(*.f64 (*.f64 1/4 y-scale) (cbrt.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3) (*.f64 2 (sqrt.f64 2)))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (cbrt.f64 (*.f64 (pow.f64 b 3) (*.f64 8 (sqrt.f64 8)))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 b b)))))) 1))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))))))
(*.f64 1/4 (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) b) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3) (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3))))
(*.f64 1/4 (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (neg.f64 (sqrt.f64 2))))
(*.f64 1/4 (*.f64 (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))) (neg.f64 (sqrt.f64 2))))
(*.f64 1/4 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b))))))
(*.f64 1/4 (*.f64 x-scale (/.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (sqrt.f64 2)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (/.f64 (sqrt.f64 2) x-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (*.f64 (/.f64 (sqrt.f64 2) y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (*.f64 (sqrt.f64 2) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) x-scale))))
(*.f64 1/4 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8))) (sqrt.f64 2)) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 1/4 (/.f64 (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) (sqrt.f64 2))) x-scale) (/.f64 (/.f64 x-scale b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (neg.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) x-scale)))))
(*.f64 1/4 (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 8)) (neg.f64 (sqrt.f64 2))) (/.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) b)))))
(fabs.f64 (*.f64 (sqrt.f64 8) (expm1.f64 (log1p.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)))))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (exp.f64 (log.f64 (*.f64 b (sqrt.f64 2)))) (*.f64 1/4 y-scale))))
(fabs.f64 (*.f64 (sqrt.f64 2) (pow.f64 (cbrt.f64 (*.f64 (*.f64 b (*.f64 y-scale 1/4)) (sqrt.f64 8))) 3)))
(fabs.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 (*.f64 1/4 y-scale) (sqrt.f64 8)))) 3))
(fabs.f64 (*.f64 (sqrt.f64 8) (log.f64 (+.f64 1 (expm1.f64 (*.f64 b (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale))))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (exp.f64 (log.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (expm1.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))) 1))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))) 1))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (-.f64 (exp.f64 (log1p.f64 (log1p.f64 (*.f64 b (*.f64 b 16))))) 1)) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (pow.f64 (pow.f64 (log1p.f64 (*.f64 b (*.f64 b 16))) 3) 1/3)) 1))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (pow.f64 (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) 2))))))
(*.f64 1/4 (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 8) x-scale)) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))))))))
(*.f64 1/4 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 1))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (*.f64 (/.f64 (pow.f64 2 1/4) (/.f64 x-scale b)) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (pow.f64 2 1/4)))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 y-scale (sqrt.f64 8)))))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (neg.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 2) a) (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))))))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) (*.f64 (sqrt.f64 2) b)) (sqrt.f64 8)) (neg.f64 y-scale)))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) a) (*.f64 (sqrt.f64 2) (sqrt.f64 8))) (neg.f64 y-scale)))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 -1 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (exp.f64 (log.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(*.f64 1/4 (sqrt.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 8)))) 2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (sqrt.f64 2) (/.f64 x-scale (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) 3) b))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (*.f64 (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (*.f64 b b)))) (cbrt.f64 b)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (fma.f64 (sqrt.f64 2) a (/.f64 (*.f64 (*.f64 1/2 (*.f64 (*.f64 angle angle) (sqrt.f64 2))) (*.f64 (pow.f64 (PI.f64) 2) (+.f64 (*.f64 (*.f64 b b) 1/32400) (*.f64 (*.f64 a a) -1/32400)))) a)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (*.f64 2 (+.f64 (/.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 1 2) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))))))))
(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 b y-scale)))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (*.f64 b y-scale))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b y-scale))))))
Outputs
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))
Calls

5 calls:

379.0ms
y-scale
305.0ms
a
291.0ms
x-scale
216.0ms
b
62.0ms
angle
Results
AccuracySegmentsBranch
32.2%3a
32.3%3b
27.9%1angle
31.7%2x-scale
36.1%5y-scale
Compiler

Compiled 2342 to 1816 computations (22.5% saved)

bsearch1.2s (0.9%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
187.0ms
8.345317277720309e+21
1.6694894826857035e+22
312.0ms
6.347393435449958e-185
1.8755105090535957e-177
354.0ms
1.9791801202306452e-256
2.2904069526902937e-251
381.0ms
-7.723209018965476e-199
-7.781286905032649e-208
Results
739.0ms146×body1024valid
295.0ms313×body256valid
120.0ms43×body512valid
66.0ms10×body2048valid
1.0msbody256infinite
Compiler

Compiled 1698 to 1455 computations (14.3% saved)

regimes1.0s (0.7%)

Counts
102 → 5
Calls
Call 1
Inputs
(*.f64 y-scale b)
(*.f64 b (neg.f64 y-scale))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 1) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16)))))))
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (exp.f64 (log.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (expm1.f64 (log1p.f64 (*.f64 b 4)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (*.f64 (pow.f64 b 3) 64))))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (pow.f64 (*.f64 b 4) 3))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (pow.f64 (cbrt.f64 4) 3))))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b 4)) 3)))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
(*.f64 1/4 (*.f64 y-scale (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3)
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 8))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) (cbrt.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (sqrt.f64 2) y-scale))))
(*.f64 (*.f64 1/4 y-scale) (/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) 1))
(*.f64 1/4 (*.f64 y-scale (log.f64 (pow.f64 (exp.f64 b) 4))))
(sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 8))) 2) 1/8))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 6))))
(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b)))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (expm1.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (fabs.f64 (*.f64 (sqrt.f64 8) b)) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 y-scale) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1))
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (*.f64 (*.f64 1/4 y-scale) b) (sqrt.f64 8)) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 b 1/4) (sqrt.f64 (*.f64 (sqrt.f64 b) (*.f64 b 16))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (cbrt.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3) 1))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b (*.f64 b 16))))) (pow.f64 (*.f64 b 4) 1/6))))
(*.f64 (/.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 y-scale (*.f64 x-scale x-scale))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (/.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1) (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1)) 1))))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)) b))))
(*.f64 (*.f64 1/4 y-scale) (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) b))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 16 (pow.f64 (cbrt.f64 b) 4))) (cbrt.f64 b))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) b)) 3) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 3))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 2))
(pow.f64 (cbrt.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 3)
(pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) y-scale))) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3))
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3) 1/3)
(*.f64 (*.f64 1/4 y-scale) (cbrt.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3) (*.f64 2 (sqrt.f64 2)))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (cbrt.f64 (*.f64 (pow.f64 b 3) (*.f64 8 (sqrt.f64 8)))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 b b)))))) 1))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))))))
(*.f64 1/4 (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) b) (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3) (pow.f64 (pow.f64 (*.f64 b 4) 1/6) 3))))
(*.f64 1/4 (*.f64 (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b (sqrt.f64 8)) y-scale)) (neg.f64 (sqrt.f64 2))))
(*.f64 1/4 (*.f64 (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8))) (neg.f64 (sqrt.f64 2))))
(*.f64 1/4 (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 a (*.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
Outputs
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))))))
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))
Calls

5 calls:

285.0ms
b
259.0ms
y-scale
231.0ms
a
122.0ms
x-scale
46.0ms
angle
Results
AccuracySegmentsBranch
32.2%3a
32.3%3b
27.9%1angle
31.7%2x-scale
36.1%5y-scale
Compiler

Compiled 1502 to 1191 computations (20.7% saved)

bsearch1.5s (1%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
196.0ms
8.345317277720309e+21
1.6694894826857035e+22
468.0ms
6.347393435449958e-185
1.8755105090535957e-177
376.0ms
1.9791801202306452e-256
2.2904069526902937e-251
409.0ms
-7.723209018965476e-199
-7.781286905032649e-208
Results
837.0ms153×body1024valid
364.0ms288×body256valid
168.0ms62×body512valid
62.0msbody2048valid
4.0msbody1024infinite
3.0msbody512infinite
1.0msbody256infinite
Compiler

Compiled 1680 to 1437 computations (14.5% saved)

regimes1.0s (0.7%)

Counts
96 → 5
Calls
Call 1
Inputs
(*.f64 y-scale b)
(*.f64 b (neg.f64 y-scale))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 1) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16)))))))
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (exp.f64 (log.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (expm1.f64 (log1p.f64 (*.f64 b 4)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (*.f64 (pow.f64 b 3) 64))))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (pow.f64 (*.f64 b 4) 3))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (pow.f64 (cbrt.f64 4) 3))))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b 4)) 3)))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
(*.f64 1/4 (*.f64 y-scale (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3)
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 8))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) (cbrt.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (sqrt.f64 2) y-scale))))
(*.f64 (*.f64 1/4 y-scale) (/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) 1))
(*.f64 1/4 (*.f64 y-scale (log.f64 (pow.f64 (exp.f64 b) 4))))
(sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 8))) 2) 1/8))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 6))))
(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b)))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (expm1.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (fabs.f64 (*.f64 (sqrt.f64 8) b)) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 y-scale) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1))
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (*.f64 (*.f64 1/4 y-scale) b) (sqrt.f64 8)) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 b 1/4) (sqrt.f64 (*.f64 (sqrt.f64 b) (*.f64 b 16))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (cbrt.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3) 1))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b (*.f64 b 16))))) (pow.f64 (*.f64 b 4) 1/6))))
(*.f64 (/.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 y-scale (*.f64 x-scale x-scale))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (/.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1) (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1)) 1))))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)) b))))
(*.f64 (*.f64 1/4 y-scale) (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) b))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 16 (pow.f64 (cbrt.f64 b) 4))) (cbrt.f64 b))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) b)) 3) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 3))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 2))
(pow.f64 (cbrt.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 3)
(pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) y-scale))) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3))
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3) 1/3)
(*.f64 (*.f64 1/4 y-scale) (cbrt.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3) (*.f64 2 (sqrt.f64 2)))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (cbrt.f64 (*.f64 (pow.f64 b 3) (*.f64 8 (sqrt.f64 8)))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 b b)))))) 1))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))))))
(*.f64 1/4 (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
Outputs
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))
Calls

5 calls:

355.0ms
y-scale
257.0ms
a
142.0ms
b
118.0ms
x-scale
82.0ms
angle
Results
AccuracySegmentsBranch
32.1%3a
32.1%3b
27.9%1angle
31.7%2x-scale
36.0%5y-scale
Compiler

Compiled 1387 to 1102 computations (20.5% saved)

bsearch1.7s (1.2%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
246.0ms
8.345317277720309e+21
1.6694894826857035e+22
329.0ms
6.347393435449958e-185
1.8755105090535957e-177
701.0ms
1.9791801202306452e-256
2.2904069526902937e-251
387.0ms
-7.723209018965476e-199
-7.781286905032649e-208
Results
790.0ms143×body1024valid
670.0ms313×body256valid
137.0ms51×body512valid
52.0msbody2048valid
3.0msbody512infinite
1.0msbody256infinite
Compiler

Compiled 1680 to 1437 computations (14.5% saved)

regimes746.0ms (0.5%)

Counts
95 → 2
Calls
Call 1
Inputs
(*.f64 y-scale b)
(*.f64 b (neg.f64 y-scale))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 1) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16)))))))
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (exp.f64 (log.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (expm1.f64 (log1p.f64 (*.f64 b 4)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (*.f64 (pow.f64 b 3) 64))))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (pow.f64 (*.f64 b 4) 3))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (pow.f64 (cbrt.f64 4) 3))))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b 4)) 3)))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
(*.f64 1/4 (*.f64 y-scale (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3)
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 8))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) (cbrt.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (sqrt.f64 2) y-scale))))
(*.f64 (*.f64 1/4 y-scale) (/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) 1))
(*.f64 1/4 (*.f64 y-scale (log.f64 (pow.f64 (exp.f64 b) 4))))
(sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 8))) 2) 1/8))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 6))))
(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b)))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (expm1.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (fabs.f64 (*.f64 (sqrt.f64 8) b)) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 y-scale) (fma.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8)) -1))
(sqrt.f64 (*.f64 2 (pow.f64 (*.f64 (*.f64 (*.f64 1/4 y-scale) b) (sqrt.f64 8)) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 b 1/4) (sqrt.f64 (*.f64 (sqrt.f64 b) (*.f64 b 16))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 2) (cbrt.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (pow.f64 (cbrt.f64 (+.f64 1 (*.f64 b (*.f64 b 16)))) 3) 1))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 b (*.f64 b 16))))) (pow.f64 (*.f64 b 4) 1/6))))
(*.f64 (/.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))) (*.f64 y-scale (*.f64 x-scale x-scale))) (pow.f64 (*.f64 x-scale y-scale) 2))
(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 (*.f64 y-scale (*.f64 x-scale x-scale)) (*.f64 (sqrt.f64 8) b))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 1 (*.f64 b (*.f64 b 16))) 2) -1)) (/.f64 1 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (*.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1) (-.f64 (sqrt.f64 (+.f64 (*.f64 b (*.f64 b 16)) 2)) 1)) 1))))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (expm1.f64 (log1p.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)) b))))
(*.f64 (*.f64 1/4 y-scale) (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (exp.f64 (log.f64 (*.f64 (sqrt.f64 8) b))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 16 (pow.f64 (cbrt.f64 b) 4))) (cbrt.f64 b))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) b)) 3) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))) 3))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 3))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 2))
(pow.f64 (cbrt.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) 3)
(pow.f64 (*.f64 1/2 (sqrt.f64 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) y-scale))) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 b (*.f64 b 16)))) 1))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))))) 1))
(*.f64 (*.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3))
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))) 3) 1/3)
(*.f64 (*.f64 1/4 y-scale) (cbrt.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 8) b) 3) (*.f64 2 (sqrt.f64 2)))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (cbrt.f64 (*.f64 (pow.f64 b 3) (*.f64 8 (sqrt.f64 8)))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (exp.f64 (+.f64 (log.f64 16) (*.f64 -2 (log.f64 (/.f64 -1 b))))) 1))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 b b)))))) 1))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 a (*.f64 (sqrt.f64 2) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) b)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 a (*.f64 (sqrt.f64 8) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 2) (*.f64 (*.f64 b (sqrt.f64 8)) (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180)))))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (*.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 (sqrt.f64 2) (*.f64 (*.f64 a (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (*.f64 y-scale (sqrt.f64 8)))))
(*.f64 1/4 (*.f64 (*.f64 y-scale (sqrt.f64 2)) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))))
(*.f64 1/4 (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (*.f64 b (sqrt.f64 8)))))))
(*.f64 1/4 (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) y-scale) (*.f64 (*.f64 a (sqrt.f64 8)) (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))))
Outputs
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
Calls

5 calls:

178.0ms
y-scale
171.0ms
a
167.0ms
x-scale
142.0ms
b
41.0ms
angle
Results
AccuracySegmentsBranch
30.0%2a
30.1%3b
27.9%1angle
31.7%2x-scale
30.9%3y-scale
Compiler

Compiled 1368 to 1087 computations (20.5% saved)

bsearch335.0ms (0.2%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
334.0ms
2302108761.450583
14095172925.779804
Results
220.0ms31×body1024valid
61.0ms50×body256valid
33.0ms13×body512valid
13.0msbody2048valid
4.0msbody1024infinite
Compiler

Compiled 418 to 323 computations (22.7% saved)

regimes334.0ms (0.2%)

Counts
44 → 2
Calls
Call 1
Inputs
(*.f64 y-scale b)
(*.f64 b (neg.f64 y-scale))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 1) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16)))))))
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (exp.f64 (log.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (expm1.f64 (log1p.f64 (*.f64 b 4)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (*.f64 (pow.f64 b 3) 64))))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (pow.f64 (*.f64 b 4) 3))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (pow.f64 (cbrt.f64 4) 3))))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b 4)) 3)))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
(*.f64 1/4 (*.f64 y-scale (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3)
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 8))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) (cbrt.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (sqrt.f64 2) y-scale))))
(*.f64 (*.f64 1/4 y-scale) (/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) 1))
(*.f64 1/4 (*.f64 y-scale (log.f64 (pow.f64 (exp.f64 b) 4))))
(sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 8))) 2) 1/8))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 6))))
(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 y-scale)))))
(fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 1/4 b)))))
Outputs
(fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
Calls

5 calls:

98.0ms
a
75.0ms
x-scale
61.0ms
b
56.0ms
y-scale
23.0ms
angle
Results
AccuracySegmentsBranch
29.7%2a
30.1%3b
27.9%1angle
31.7%2x-scale
30.9%3y-scale
Compiler

Compiled 532 to 420 computations (21.1% saved)

bsearch280.0ms (0.2%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
279.0ms
2302108761.450583
14095172925.779804
Results
123.0ms27×body1024valid
122.0ms59×body256valid
20.0msbody512valid
12.0msbody2048valid
Compiler

Compiled 418 to 323 computations (22.7% saved)

regimes340.0ms (0.2%)

Counts
41 → 2
Calls
Call 1
Inputs
(*.f64 y-scale b)
(*.f64 b (neg.f64 y-scale))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 1) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16)))))))
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (exp.f64 (log.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (expm1.f64 (log1p.f64 (*.f64 b 4)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (*.f64 (pow.f64 b 3) 64))))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (pow.f64 (*.f64 b 4) 3))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (pow.f64 (cbrt.f64 4) 3))))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b 4)) 3)))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
(*.f64 1/4 (*.f64 y-scale (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3)
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 8))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) (cbrt.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (sqrt.f64 2) y-scale))))
(*.f64 (*.f64 1/4 y-scale) (/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) 1))
(*.f64 1/4 (*.f64 y-scale (log.f64 (pow.f64 (exp.f64 b) 4))))
(sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 8))) 2) 1/8))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 6))))
(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
Outputs
(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
Calls

5 calls:

97.0ms
b
94.0ms
y-scale
55.0ms
a
54.0ms
x-scale
20.0ms
angle
Results
AccuracySegmentsBranch
29.7%2a
29.7%3b
27.5%1angle
31.3%2x-scale
30.5%3y-scale
Compiler

Compiled 496 to 390 computations (21.4% saved)

bsearch277.0ms (0.2%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
276.0ms
2302108761.450583
14095172925.779804
Results
194.0ms35×body1024valid
46.0ms51×body256valid
22.0msbody512valid
12.0msbody2048valid
Compiler

Compiled 418 to 323 computations (22.7% saved)

regimes306.0ms (0.2%)

Counts
40 → 3
Calls
Call 1
Inputs
(*.f64 y-scale b)
(*.f64 b (neg.f64 y-scale))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 1) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16)))))))
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (exp.f64 (log.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (expm1.f64 (log1p.f64 (*.f64 b 4)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (*.f64 (pow.f64 b 3) 64))))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (pow.f64 (*.f64 b 4) 3))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (pow.f64 (cbrt.f64 4) 3))))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b 4)) 3)))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
(*.f64 1/4 (*.f64 y-scale (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3)
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 8))) (sqrt.f64 2)))
(*.f64 1/4 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 8)) (/.f64 (*.f64 (sqrt.f64 2) b) x-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) (cbrt.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) a)) (/.f64 (sqrt.f64 2) y-scale))))
(*.f64 (*.f64 1/4 y-scale) (/.f64 1 (/.f64 1 (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(*.f64 (*.f64 1/4 y-scale) (-.f64 (/.f64 (+.f64 1 (*.f64 -16 (*.f64 b b))) (-.f64 1 (*.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))))) 1))
(*.f64 1/4 (*.f64 y-scale (log.f64 (pow.f64 (exp.f64 b) 4))))
(sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 8))) 2) 1/8))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 6))))
Outputs
(*.f64 y-scale b)
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a))))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
Calls

5 calls:

72.0ms
a
57.0ms
x-scale
53.0ms
b
52.0ms
y-scale
51.0ms
angle
Results
AccuracySegmentsBranch
24.4%4a
22.7%3b
20.6%2angle
24.4%2x-scale
24.9%3y-scale
Compiler

Compiled 484 to 380 computations (21.5% saved)

bsearch846.0ms (0.6%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
685.0ms
3.758770865850414e+48
1.8504941832465623e+58
161.0ms
-1.2237652325591064e-213
-6.667069483536654e-214
Results
385.0ms65×body1024valid
266.0ms30×body512valid
163.0ms128×body256valid
13.0msbody1024infinite
11.0msbody2048valid
5.0msbody256infinite
Compiler

Compiled 658 to 513 computations (22% saved)

regimes321.0ms (0.2%)

Counts
30 → 3
Calls
Call 1
Inputs
(*.f64 y-scale b)
(*.f64 b (neg.f64 y-scale))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 1) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16)))))))
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (exp.f64 (log.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (expm1.f64 (log1p.f64 (*.f64 b 4)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (*.f64 (pow.f64 b 3) 64))))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (pow.f64 (*.f64 b 4) 3))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (pow.f64 (cbrt.f64 4) 3))))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b 4)) 3)))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (*.f64 (sqrt.f64 8) (sqrt.f64 2)))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2))))
(*.f64 1/4 (*.f64 y-scale (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)))
(*.f64 b (*.f64 (*.f64 (sqrt.f64 2) (*.f64 1/4 y-scale)) (sqrt.f64 8)))
(*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b 1/4) y-scale)))
(*.f64 (*.f64 1/4 y-scale) (*.f64 (*.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(*.f64 (*.f64 1/4 (sqrt.f64 8)) (*.f64 (*.f64 (sqrt.f64 2) b) y-scale))
(pow.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64) 1/3)
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b (*.f64 b 16))) 3/2)))
Outputs
(*.f64 y-scale b)
(*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
Calls

5 calls:

89.0ms
angle
67.0ms
b
63.0ms
x-scale
49.0ms
y-scale
26.0ms
a
Results
AccuracySegmentsBranch
22.5%2a
20.8%2b
20.6%2angle
21.8%2x-scale
24.5%3y-scale
Compiler

Compiled 344 to 271 computations (21.2% saved)

bsearch797.0ms (0.6%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
449.0ms
3.758770865850414e+48
1.8504941832465623e+58
347.0ms
-7.165770095994652e-171
-3.998023256828735e-172
Results
415.0ms73×body1024valid
149.0ms157×body256valid
131.0ms37×body512valid
54.0msbody2048valid
33.0msbody1024infinite
6.0msbody512infinite
3.0msbody256infinite
Compiler

Compiled 708 to 565 computations (20.2% saved)

regimes109.0ms (0.1%)

Counts
19 → 2
Calls
Call 1
Inputs
(*.f64 y-scale b)
(*.f64 b (neg.f64 y-scale))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 1) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16)))))))
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (exp.f64 (log.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (expm1.f64 (log1p.f64 (*.f64 b 4)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (*.f64 (pow.f64 b 3) 64))))
(*.f64 1/4 (*.f64 y-scale (cbrt.f64 (pow.f64 (*.f64 b 4) 3))))
(*.f64 1/4 (*.f64 y-scale (*.f64 b (pow.f64 (cbrt.f64 4) 3))))
(*.f64 1/4 (*.f64 y-scale (pow.f64 (cbrt.f64 (*.f64 b 4)) 3)))
(pow.f64 (cbrt.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))) 3)
(pow.f64 (*.f64 (sqrt.f64 (*.f64 b (*.f64 1/4 y-scale))) 2) 2)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)))))
Outputs
(*.f64 y-scale b)
(sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2))
Calls

5 calls:

31.0ms
angle
22.0ms
b
18.0ms
y-scale
17.0ms
a
11.0ms
x-scale
Results
AccuracySegmentsBranch
18.7%1a
20.8%2b
20.6%2angle
18.7%1x-scale
20.8%2y-scale
Compiler

Compiled 222 to 172 computations (22.5% saved)

bsearch343.0ms (0.2%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
343.0ms
-2.5129872606869856e-128
-3.7011370009079704e-132
Results
240.0ms46×body1024valid
68.0ms70×body256valid
32.0ms12×body512valid
Compiler

Compiled 396 to 299 computations (24.5% saved)

regimes51.0ms (0%)

Counts
11 → 2
Calls
Call 1
Inputs
(*.f64 y-scale b)
(*.f64 b (neg.f64 y-scale))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
(sqrt.f64 (*.f64 (*.f64 (*.f64 b b) 16) (*.f64 1/16 (*.f64 y-scale y-scale))))
(*.f64 1/4 (*.f64 y-scale (*.f64 (sqrt.f64 (*.f64 b (*.f64 b 4))) 2)))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (-.f64 (+.f64 (*.f64 b (*.f64 b 16)) 1) 1))))
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (/.f64 1 (/.f64 1 (*.f64 b (*.f64 b 16)))))))
(exp.f64 (log.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale))))
(*.f64 1/4 (*.f64 y-scale (exp.f64 (log.f64 (*.f64 b 4)))))
(*.f64 1/4 (*.f64 y-scale (expm1.f64 (log1p.f64 (*.f64 b 4)))))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 b (*.f64 1/4 y-scale)) 3) 64))
Outputs
(*.f64 y-scale b)
(*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))
Calls

5 calls:

14.0ms
y-scale
9.0ms
angle
7.0ms
a
7.0ms
b
6.0ms
x-scale
Results
AccuracySegmentsBranch
18.7%1a
18.7%1b
18.7%1angle
18.7%1x-scale
20.8%2y-scale
Compiler

Compiled 141 to 107 computations (24.1% saved)

bsearch415.0ms (0.3%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
415.0ms
1.6694894826857035e+22
1.3245807147692784e+38
Results
222.0ms44×body1024valid
100.0ms93×body256valid
59.0ms20×body512valid
18.0msbody2048valid
13.0msbody1024infinite
Compiler

Compiled 446 to 331 computations (25.8% saved)

regimes24.0ms (0%)

Accuracy

Total -10.2b remaining (-20.1%)

Threshold costs -10.2b (-20.1%)

Counts
2 → 2
Calls
Call 1
Inputs
(*.f64 y-scale b)
(*.f64 b (neg.f64 y-scale))
Outputs
(*.f64 y-scale b)
(*.f64 b (neg.f64 y-scale))
Calls

5 calls:

7.0ms
y-scale
3.0ms
b
3.0ms
angle
3.0ms
x-scale
3.0ms
a
Results
AccuracySegmentsBranch
18.7%1a
18.7%1b
18.7%1angle
18.7%1x-scale
20.5%2y-scale
Compiler

Compiled 42 to 33 computations (21.4% saved)

bsearch379.0ms (0.3%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
378.0ms
1.0550438341295761e+119
4.381408397941121e+128
Results
169.0ms35×body1024valid
99.0ms91×body256valid
47.0ms17×body512valid
32.0msbody1024infinite
19.0msbody512infinite
6.0msbody2048valid
4.0msbody256infinite
Compiler

Compiled 367 to 266 computations (27.5% saved)

simplify56.0ms (0%)

Algorithm
egg-herbie
Rules
184×*-commutative
48×+-commutative
48×neg-sub0
46×neg-mul-1
42×fabs-mul
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
01651559
12461559
23011559
33611551
44101547
54411535
64551535
74591535
84601535
Stop Event
fuel
saturated
Calls
Call 1
Inputs
(if (<=.f64 x-scale 1470053796651389/38685626227668133590597632) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))))
(if (<=.f64 y-scale -6032744662767799/10772758326371068942829547280138503507047095916181860064252479289484763452000421523688789066296501148112861120217452989876263797248376430311685764650295051980708298078471054537096527376147092924971608579554880258048) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 8873697202669377/2063650512248692368563827284830142994214247367328599695812346519635444931862206482321942405811160890213571855442410658901884170154307365379884917884620857722298385484371113610034107490923540785363375909797699954703703235518560788042337487885808736236287260081631789056) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))) (if (<=.f64 y-scale 4784065733063811/4784065733063810973581885157618788676291241975216665977767007373648750357731006099232824032039924032894289638403441329240212719241920971274455782595989040464660523567661989180298099889009174801022976) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) (if (<=.f64 y-scale 8500000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))))))
(if (<=.f64 y-scale -4039784372389151/5386379163185534471414773640069251753523547958090930032126239644742381726000210761844394533148250574056430560108726494938131898624188215155842882325147525990354149039235527268548263688073546462485804289777440129024) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 80482369977699/1031825256124346184281913642415071497107123683664299847906173259817722465931103241160971202905580445106785927721205329450942085077153682689942458942310428861149192742185556805017053745461770392681687954898849977351851617759280394021168743942904368118143630040815894528) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))) (if (<=.f64 y-scale 3061802069160839/38272525864510487788655081260950309410329935801733327822136058989190002861848048793862592256319392263154317107227530633921701753935367770195646260767912323717284188541295913442384799112073398408183808) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) (if (<=.f64 y-scale 9800000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))))))
(if (<=.f64 y-scale -6618782715722385/5515652263101987298728728207430913795608113109085112352897269396216198887424215820128660001943808587833784893551335930816647064191168732319583111500951066614122648616177179922993422016587311577585463592732098692120576) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 6810046690420685/515912628062173092140956821207535748553561841832149923953086629908861232965551620580485601452790222553392963860602664725471042538576841344971229471155214430574596371092778402508526872730885196340843977449424988675925808879640197010584371971452184059071815020407947264) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))) (if (<=.f64 y-scale 3827252586451049/38272525864510487788655081260950309410329935801733327822136058989190002861848048793862592256319392263154317107227530633921701753935367770195646260767912323717284188541295913442384799112073398408183808) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) (if (<=.f64 y-scale 8400000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))))))
(if (<=.f64 x-scale 8400000000) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a)))))))
(if (<=.f64 x-scale 12500000000) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a)))))))
(if (<=.f64 x-scale 14000000000) (fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a)))))))
(if (<=.f64 y-scale -4851619038439715/6064523798049644277925701126806650606472211004362096137261922023539261533931159712229993784486900304494092698035668254711607734547323493716579247168129613825017402250081444943555723771998431425098683590600454956058175183022718976) (*.f64 y-scale b) (if (<=.f64 y-scale 18500000000000000892277734748516332756518886703104) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a)))))) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))))
(if (<=.f64 y-scale -6787688601961731/4351082437154956072465106588077822995084026820419845514849846380137705962380101572519219218556758308199541387151331336317719177934050977705242787666055883587123865770683541250307916824576) (*.f64 y-scale b) (if (<=.f64 y-scale 3800000000000000004354926742076186556031370788864) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a)))) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))))
(if (<=.f64 b -8428721085853179/6243497100631984462763194459586332611497196285329942301718313919250743477639531240240612206126983942319653862242813245790895951358576570612580352) (*.f64 y-scale b) (sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2)))
(if (<=.f64 y-scale 4599999999999999922584288231424) (*.f64 y-scale b) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))))
(if (<=.f64 y-scale 140000000000000006517823696094853681352592614170309389532456032152450203231794681574444704999668474350119022535236386816) (*.f64 y-scale b) (*.f64 b (neg.f64 y-scale)))
(*.f64 y-scale b)
Outputs
(if (<=.f64 x-scale 1470053796651389/38685626227668133590597632) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (hypot.f64 (*.f64 a (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle))) (*.f64 b (sin.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))))))
(if (<=.f64 y-scale -6032744662767799/10772758326371068942829547280138503507047095916181860064252479289484763452000421523688789066296501148112861120217452989876263797248376430311685764650295051980708298078471054537096527376147092924971608579554880258048) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 8873697202669377/2063650512248692368563827284830142994214247367328599695812346519635444931862206482321942405811160890213571855442410658901884170154307365379884917884620857722298385484371113610034107490923540785363375909797699954703703235518560788042337487885808736236287260081631789056) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 -1 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))))) (if (<=.f64 y-scale 4784065733063811/4784065733063810973581885157618788676291241975216665977767007373648750357731006099232824032039924032894289638403441329240212719241920971274455782595989040464660523567661989180298099889009174801022976) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) (if (<=.f64 y-scale 8500000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))))))
(if (<=.f64 y-scale -6032744662767799/10772758326371068942829547280138503507047095916181860064252479289484763452000421523688789066296501148112861120217452989876263797248376430311685764650295051980708298078471054537096527376147092924971608579554880258048) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 8873697202669377/2063650512248692368563827284830142994214247367328599695812346519635444931862206482321942405811160890213571855442410658901884170154307365379884917884620857722298385484371113610034107490923540785363375909797699954703703235518560788042337487885808736236287260081631789056) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 (PI.f64) angle))))))))) (if (<=.f64 y-scale 4784065733063811/4784065733063810973581885157618788676291241975216665977767007373648750357731006099232824032039924032894289638403441329240212719241920971274455782595989040464660523567661989180298099889009174801022976) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (if (<=.f64 y-scale 8500000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 a (neg.f64 (sqrt.f64 2))))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 (sqrt.f64 8) y-scale)))))))))
(if (<=.f64 y-scale -6032744662767799/10772758326371068942829547280138503507047095916181860064252479289484763452000421523688789066296501148112861120217452989876263797248376430311685764650295051980708298078471054537096527376147092924971608579554880258048) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 8873697202669377/2063650512248692368563827284830142994214247367328599695812346519635444931862206482321942405811160890213571855442410658901884170154307365379884917884620857722298385484371113610034107490923540785363375909797699954703703235518560788042337487885808736236287260081631789056) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 (PI.f64) angle)))) (neg.f64 (sqrt.f64 2)))))) (if (<=.f64 y-scale 4784065733063811/4784065733063810973581885157618788676291241975216665977767007373648750357731006099232824032039924032894289638403441329240212719241920971274455782595989040464660523567661989180298099889009174801022976) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (if (<=.f64 y-scale 8500000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) (neg.f64 a)))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 (sqrt.f64 8) y-scale)))))))))
(if (<=.f64 y-scale -6032744662767799/10772758326371068942829547280138503507047095916181860064252479289484763452000421523688789066296501148112861120217452989876263797248376430311685764650295051980708298078471054537096527376147092924971608579554880258048) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 8873697202669377/2063650512248692368563827284830142994214247367328599695812346519635444931862206482321942405811160890213571855442410658901884170154307365379884917884620857722298385484371113610034107490923540785363375909797699954703703235518560788042337487885808736236287260081631789056) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 (cos.f64 (*.f64 1/180 (*.f64 (PI.f64) angle))) (neg.f64 a)))))) (if (<=.f64 y-scale 4784065733063811/4784065733063810973581885157618788676291241975216665977767007373648750357731006099232824032039924032894289638403441329240212719241920971274455782595989040464660523567661989180298099889009174801022976) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (if (<=.f64 y-scale 8500000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) (neg.f64 a)))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 (sqrt.f64 8) y-scale)))))))))
(if (<=.f64 y-scale -6032744662767799/10772758326371068942829547280138503507047095916181860064252479289484763452000421523688789066296501148112861120217452989876263797248376430311685764650295051980708298078471054537096527376147092924971608579554880258048) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 8873697202669377/2063650512248692368563827284830142994214247367328599695812346519635444931862206482321942405811160890213571855442410658901884170154307365379884917884620857722298385484371113610034107490923540785363375909797699954703703235518560788042337487885808736236287260081631789056) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 (PI.f64) angle))))))) -1/4) (if (<=.f64 y-scale 4784065733063811/4784065733063810973581885157618788676291241975216665977767007373648750357731006099232824032039924032894289638403441329240212719241920971274455782595989040464660523567661989180298099889009174801022976) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (if (<=.f64 y-scale 8500000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) (neg.f64 a)))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 (sqrt.f64 8) y-scale)))))))))
(if (<=.f64 y-scale -6032744662767799/10772758326371068942829547280138503507047095916181860064252479289484763452000421523688789066296501148112861120217452989876263797248376430311685764650295051980708298078471054537096527376147092924971608579554880258048) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 8873697202669377/2063650512248692368563827284830142994214247367328599695812346519635444931862206482321942405811160890213571855442410658901884170154307365379884917884620857722298385484371113610034107490923540785363375909797699954703703235518560788042337487885808736236287260081631789056) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) (*.f64 a (cos.f64 (*.f64 1/180 (*.f64 (PI.f64) angle))))))) -1/4) (if (<=.f64 y-scale 4784065733063811/4784065733063810973581885157618788676291241975216665977767007373648750357731006099232824032039924032894289638403441329240212719241920971274455782595989040464660523567661989180298099889009174801022976) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (if (<=.f64 y-scale 8500000000000000000000) (*.f64 -1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) a))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 (sqrt.f64 8) y-scale)))))))))
(if (<=.f64 y-scale -4039784372389151/5386379163185534471414773640069251753523547958090930032126239644742381726000210761844394533148250574056430560108726494938131898624188215155842882325147525990354149039235527268548263688073546462485804289777440129024) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 80482369977699/1031825256124346184281913642415071497107123683664299847906173259817722465931103241160971202905580445106785927721205329450942085077153682689942458942310428861149192742185556805017053745461770392681687954898849977351851617759280394021168743942904368118143630040815894528) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))) (if (<=.f64 y-scale 3061802069160839/38272525864510487788655081260950309410329935801733327822136058989190002861848048793862592256319392263154317107227530633921701753935367770195646260767912323717284188541295913442384799112073398408183808) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) (if (<=.f64 y-scale 9800000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (neg.f64 (sqrt.f64 2)) a) (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))))))
(if (<=.f64 y-scale -4039784372389151/5386379163185534471414773640069251753523547958090930032126239644742381726000210761844394533148250574056430560108726494938131898624188215155842882325147525990354149039235527268548263688073546462485804289777440129024) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 80482369977699/1031825256124346184281913642415071497107123683664299847906173259817722465931103241160971202905580445106785927721205329450942085077153682689942458942310428861149192742185556805017053745461770392681687954898849977351851617759280394021168743942904368118143630040815894528) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 a (neg.f64 (sqrt.f64 2))))))) (if (<=.f64 y-scale 3061802069160839/38272525864510487788655081260950309410329935801733327822136058989190002861848048793862592256319392263154317107227530633921701753935367770195646260767912323717284188541295913442384799112073398408183808) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (if (<=.f64 y-scale 9800000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 a (neg.f64 (sqrt.f64 2))))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 (sqrt.f64 8) y-scale)))))))))
(if (<=.f64 y-scale -4039784372389151/5386379163185534471414773640069251753523547958090930032126239644742381726000210761844394533148250574056430560108726494938131898624188215155842882325147525990354149039235527268548263688073546462485804289777440129024) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 80482369977699/1031825256124346184281913642415071497107123683664299847906173259817722465931103241160971202905580445106785927721205329450942085077153682689942458942310428861149192742185556805017053745461770392681687954898849977351851617759280394021168743942904368118143630040815894528) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) (neg.f64 a)))))) (if (<=.f64 y-scale 3061802069160839/38272525864510487788655081260950309410329935801733327822136058989190002861848048793862592256319392263154317107227530633921701753935367770195646260767912323717284188541295913442384799112073398408183808) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (if (<=.f64 y-scale 9800000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) (neg.f64 a)))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 (sqrt.f64 8) y-scale)))))))))
(if (<=.f64 y-scale -4039784372389151/5386379163185534471414773640069251753523547958090930032126239644742381726000210761844394533148250574056430560108726494938131898624188215155842882325147525990354149039235527268548263688073546462485804289777440129024) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 80482369977699/1031825256124346184281913642415071497107123683664299847906173259817722465931103241160971202905580445106785927721205329450942085077153682689942458942310428861149192742185556805017053745461770392681687954898849977351851617759280394021168743942904368118143630040815894528) (*.f64 -1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) a))))) (if (<=.f64 y-scale 3061802069160839/38272525864510487788655081260950309410329935801733327822136058989190002861848048793862592256319392263154317107227530633921701753935367770195646260767912323717284188541295913442384799112073398408183808) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (if (<=.f64 y-scale 9800000000000000000000) (*.f64 -1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (cos.f64 (*.f64 (*.f64 1/180 (PI.f64)) angle)) (*.f64 (sqrt.f64 2) a))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 (sqrt.f64 8) y-scale)))))))))
(if (<=.f64 y-scale -6618782715722385/5515652263101987298728728207430913795608113109085112352897269396216198887424215820128660001943808587833784893551335930816647064191168732319583111500951066614122648616177179922993422016587311577585463592732098692120576) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 6810046690420685/515912628062173092140956821207535748553561841832149923953086629908861232965551620580485601452790222553392963860602664725471042538576841344971229471155214430574596371092778402508526872730885196340843977449424988675925808879640197010584371971452184059071815020407947264) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))) (if (<=.f64 y-scale 3827252586451049/38272525864510487788655081260950309410329935801733327822136058989190002861848048793862592256319392263154317107227530633921701753935367770195646260767912323717284188541295913442384799112073398408183808) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))))))) (if (<=.f64 y-scale 8400000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (neg.f64 (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8))))))))))
(if (<=.f64 y-scale -6618782715722385/5515652263101987298728728207430913795608113109085112352897269396216198887424215820128660001943808587833784893551335930816647064191168732319583111500951066614122648616177179922993422016587311577585463592732098692120576) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 6810046690420685/515912628062173092140956821207535748553561841832149923953086629908861232965551620580485601452790222553392963860602664725471042538576841344971229471155214430574596371092778402508526872730885196340843977449424988675925808879640197010584371971452184059071815020407947264) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (if (<=.f64 y-scale 3827252586451049/38272525864510487788655081260950309410329935801733327822136058989190002861848048793862592256319392263154317107227530633921701753935367770195646260767912323717284188541295913442384799112073398408183808) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (if (<=.f64 y-scale 8400000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 (sqrt.f64 8) y-scale)))))))))
(if (<=.f64 y-scale -6618782715722385/5515652263101987298728728207430913795608113109085112352897269396216198887424215820128660001943808587833784893551335930816647064191168732319583111500951066614122648616177179922993422016587311577585463592732098692120576) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 6810046690420685/515912628062173092140956821207535748553561841832149923953086629908861232965551620580485601452790222553392963860602664725471042538576841344971229471155214430574596371092778402508526872730885196340843977449424988675925808879640197010584371971452184059071815020407947264) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 2) (neg.f64 a)))))) (if (<=.f64 y-scale 3827252586451049/38272525864510487788655081260950309410329935801733327822136058989190002861848048793862592256319392263154317107227530633921701753935367770195646260767912323717284188541295913442384799112073398408183808) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (if (<=.f64 y-scale 8400000000000000000000) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 2) (neg.f64 a)))))) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 (sqrt.f64 8) y-scale)))))))))
(if (<=.f64 y-scale -6618782715722385/5515652263101987298728728207430913795608113109085112352897269396216198887424215820128660001943808587833784893551335930816647064191168732319583111500951066614122648616177179922993422016587311577585463592732098692120576) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (if (<=.f64 y-scale 6810046690420685/515912628062173092140956821207535748553561841832149923953086629908861232965551620580485601452790222553392963860602664725471042538576841344971229471155214430574596371092778402508526872730885196340843977449424988675925808879640197010584371971452184059071815020407947264) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) -1/4) (if (<=.f64 y-scale 3827252586451049/38272525864510487788655081260950309410329935801733327822136058989190002861848048793862592256319392263154317107227530633921701753935367770195646260767912323717284188541295913442384799112073398408183808) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (if (<=.f64 y-scale 8400000000000000000000) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (*.f64 (sqrt.f64 2) a) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) -1/4) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 (sqrt.f64 8) y-scale)))))))))
(if (<=.f64 x-scale 8400000000) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 1/4 y-scale)))) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a)))))))
(if (<=.f64 x-scale 12500000000) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 y-scale (sqrt.f64 8)))))) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a)))))))
(if (<=.f64 x-scale 12500000000) (fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 b (*.f64 1/4 (*.f64 (sqrt.f64 8) y-scale))))) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a)))))))
(if (<=.f64 x-scale 14000000000) (fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a)))))))
(if (<=.f64 x-scale 14000000000) (*.f64 1/4 (fabs.f64 (*.f64 (*.f64 (sqrt.f64 8) b) (*.f64 (sqrt.f64 2) y-scale)))) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a)))))))
(if (<=.f64 y-scale -4851619038439715/6064523798049644277925701126806650606472211004362096137261922023539261533931159712229993784486900304494092698035668254711607734547323493716579247168129613825017402250081444943555723771998431425098683590600454956058175183022718976) (*.f64 y-scale b) (if (<=.f64 y-scale 18500000000000000892277734748516332756518886703104) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a)))))) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))))
(if (<=.f64 y-scale -4851619038439715/6064523798049644277925701126806650606472211004362096137261922023539261533931159712229993784486900304494092698035668254711607734547323493716579247168129613825017402250081444943555723771998431425098683590600454956058175183022718976) (*.f64 b y-scale) (if (<=.f64 y-scale 18500000000000000892277734748516332756518886703104) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (sqrt.f64 (*.f64 2 (*.f64 a a)))))) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))))
(if (<=.f64 y-scale -6787688601961731/4351082437154956072465106588077822995084026820419845514849846380137705962380101572519219218556758308199541387151331336317719177934050977705242787666055883587123865770683541250307916824576) (*.f64 y-scale b) (if (<=.f64 y-scale 3800000000000000004354926742076186556031370788864) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a)))) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))))
(if (<=.f64 y-scale -6787688601961731/4351082437154956072465106588077822995084026820419845514849846380137705962380101572519219218556758308199541387151331336317719177934050977705242787666055883587123865770683541250307916824576) (*.f64 b y-scale) (if (<=.f64 y-scale 3800000000000000004354926742076186556031370788864) (*.f64 1/4 (*.f64 x-scale (*.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) a)))) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16))))))
(if (<=.f64 b -8428721085853179/6243497100631984462763194459586332611497196285329942301718313919250743477639531240240612206126983942319653862242813245790895951358576570612580352) (*.f64 y-scale b) (sqrt.f64 (pow.f64 (*.f64 (*.f64 b 4) (*.f64 1/4 y-scale)) 2)))
(if (<=.f64 b -8428721085853179/6243497100631984462763194459586332611497196285329942301718313919250743477639531240240612206126983942319653862242813245790895951358576570612580352) (*.f64 b y-scale) (sqrt.f64 (pow.f64 (*.f64 (*.f64 1/4 y-scale) (*.f64 b 4)) 2)))
(if (<=.f64 y-scale 4599999999999999922584288231424) (*.f64 y-scale b) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))))
(if (<=.f64 y-scale 4599999999999999922584288231424) (*.f64 b y-scale) (*.f64 1/4 (*.f64 y-scale (sqrt.f64 (*.f64 (*.f64 b b) 16)))))
(if (<=.f64 y-scale 140000000000000006517823696094853681352592614170309389532456032152450203231794681574444704999668474350119022535236386816) (*.f64 y-scale b) (*.f64 b (neg.f64 y-scale)))
(if (<=.f64 y-scale 140000000000000006517823696094853681352592614170309389532456032152450203231794681574444704999668474350119022535236386816) (*.f64 b y-scale) (*.f64 b (neg.f64 y-scale)))
(*.f64 y-scale b)
(*.f64 b y-scale)
Compiler

Compiled 591 to 470 computations (20.5% saved)

soundness3.6s (2.6%)

Rules
1758×distribute-lft-neg-out
1758×distribute-lft-neg-out
1478×associate-*r/
1478×associate-*r/
1336×times-frac
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
060583
1162557
2675557
35646553
01408302510
15166302510
01465
128165
2313765
060583
1162557
2675557
35646553
01408302510
15166302510
040115346
1105413826
2517313826
Stop Event
node limit
node limit
node limit
node limit
node limit
node limit
Compiler

Compiled 1074 to 765 computations (28.8% saved)

end362.0ms (0.3%)

Compiler

Compiled 531 to 397 computations (25.2% saved)

Profiling

Loading profile data...